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信息 科学 与 技术 正在 对 人 类 社会 的 发 展 产生 难以 估量 的 深远 影响 ,并 将 成 为 新 所 纪 
的 一 个 标志 。 作 为 人 类 总 体 智 禁 的 结 马 ,电脑 已 经 成 为 一 种 新 的 现代 文化 ,。“ 计 算 机 的 普 
及 到 从 娃娃 做 起 "已 经 成 为 “科教 兴国 "的 一 项 重要 内 容 。 

一 个 国家 ,一 个 民族 要 想 不 落 伍 , 要 想 跻 身 于 世界 先进 民族 之 林 , 关 键 在 于 拥有 高 素 
质 的 人 才 ;综合 国 力 的 竞争 ,说 到 底 也 是 人 人 才 的 竞争 。 电 子 计算 机 是 现代 科学 与 技术 的 基 
础 和 核心 , 它 的 飞速 发 展 ,把 社会 生产 力 水 平 提 到 前 所 未 有 的 高 度 , 人 类 进入 了 信息 时 代 。 
电脑 对 人 类 社会 的 发 展 所 起 的 巨大 作用 ,特别 是 对 人 类 智能 的 发 展 所 起 的 促进 作用 ,已 为 
人 们 普遍 认识 到 .计算 , 跟 语言 一 样 是 人 类 社会 每 时 每 刻 都 不 可 缺少 的 。 现在 ,人 类 已 经 
拥有 了 帮助 自己 进行 复杂 计算 与 思维 的 工具 ,电子 计算 机 起 到 了 人 脑 延 伸 的 作用 。 以 往 历 
史上 的 技术 革命 ,只 能 起 到 创造 和 改进 工具 ,用 机 器 代替 人 的 体力 的 作用 ;而 计算 机 则 是 
把 人 从 重复 性 的 或 有 固定 程式 的 脑力 劳动 中 解放 出 来 ,使 自己 的 智能 获得 空前 的 发 展 。 作 
为 “人 类 通用 智力 工具 ?计算 机 在 开发 人 类 智能 方面 所 起 的 无 与 伦比 的 作用 不 容 忽 杭 。 这 
也 就 是 计算 机 与 基础 教育 相 结合 ,能够 成 为 当今 世界 的 大 趋势 的 一 个 原因 .从 信息 社会 要 
求人 才 具 备 的 科学 素养 看 ,数学 ,物理 学 .化 学 .生命 科学 和 信息 科学 是 五 大 支柱 ,这 正 是 
联合 国教 科 文 组 织 倡导 举行 五 项 国际 学 科 奥 林 匹 克 竞 赛 的 内 容 。 

国际 信息 学 奥林匹克 (International Olympiad in Informatics ,简称 IOT) 始 于 1989 
年 ,到 1996 年 已 成 功 地 举办 了 8 届 , 这 是 一 种 智力 与 应 用 计算 机 能 力 的 太 赛 ,从 益 智 的 角 
度 看 ,是 用 电脑 帮助 开发 人 脑 , 重 在 提高 思维 能 力 ,培养 创 新 意识 .在 中 国 队 的 训练 中 强调 
德 智 体 美 全 面 发 展 ! 心 态 上 自立 .自尊 .自信 ,自强 ,要 怀 闭 中 华 民 族 的 自豪 感 和 自信 心 
去 参赛 :这 种 心态 是 学习、 训练 和 取胜 的 重要 条 件 。8 届 比 赛 ,中 国 队 每 届 都 取得 了 名 列 前 
茅 的 好 成 绩 ,31 人 次 参赛 , 夺 得 31 块 奖牌 ,其 中 金牌 17 块 ,银牌 6 块 . 铜 黎 8 块 。 特 别 是 
IOT95( 荷 兰 ) 突 破 了 前 6 届 比 赛 女孩 与 金奖 无 缘 的 纪录 ,两 名 中 国 女 选手 荣 登 金牌 领 奖 
台 。 在 IOT'96( 匈 牙 利 ;上 中 国 队 又 实现 了 金 金 的 突破 ,四 各 选手 ,每 人 夺 得 TRE. 

从 大 局 署 ,竞赛 不 是 目的 ,是 推动 普及 的 手段 ,我 们 的 目的 只 有 一 个 ,“ 科 教 兴国 ”。 况 
赛 活 动 带 有 因材施教 , 因 材 施 浏 的 特点 。 普 及 是 有 层次 的 ,与 学 科 竞 赛 有 关 的 普及 活动 ,对 
青少年 而 言 属 于 比较 高 的 晨 次 ,当然 就 有 相当 的 难度 ,我 们 编写 的 这 套 青少年 计算 机 竞赛 
指导 从 书 , 涉 及 程序 设计 语言 .常用 算法 .组 合 数学 ,图 论 . 人 工 智能 搜索 等 的 基本 知识 和 
基本 方法 。 这 些 理 论 知 识 往 往 都 是 通过 竞赛 当中 的 一 些 实例 来 讲解 的 。 目 前 已 拨 就 了 三 
本 书 ; 其 一 其 《组 台数 学 的 算法 与 程序 设计 》, 其 二 是 《图 论 算 法 与 程序 设计 3 其 三 是 《 国 
际 知 内 青少年 信息 学 (计算 机 1 竞赛 试题 解析 (1994 一 1995)73，, 前 两 本 书 试 图 从 数学 的 基本 
概念 和 基本 理论 出 发 ,给 出 算法 设计 和 编写 程序 的 方法 ,第 三 本 书 收集 了 最 近 国 际 国内 比 
赛 的 典型 试题 及 其 解法 ,重点 放 在 解 题 思路 上 。 这 里 许多 题目 比较 新 颖 ,很 难 去 套 固 定 算 
法 或 固定 模式 ,这 中 间 有 些 招数 是 选手 们 想 出 来 的 .从 中 可 以 看 出 信息 学 奥林匹克 要 求 创 

elc 


新 ,鼓励 创新 。 当 然 , 书 中 给 出 的 解法 ,对 家 少 年 读者 而 言 , 我 们 希望 仅仅 起 到 抛砖引玉 的 
作用 ,并 且 热 切 岑 望 引出 更 多 的 玉 来 .作为 老师 ,我 和 王建 德 都 这 样 想 “精心 育 桃李 , 热 户 
青 胜 兰 ?” 就 是 我 们 编写 这 套 丛 书 的 初 囊 。 
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第 一 章 基本 概念 


1.1 5|] * 


图 论 是 一 个 应 用 十 分 广 证 而 又 极其 有 趣 的 数学 分 支 。 物理 .化 学 .生物 ,科学 管理 . 计 
算 机 等 各 个 锁 域 都 可 找到 图 论 的 足迹 ,本 书 不 想 对 图 论 作 广泛 而 深入 的 探讨 ,主要 介绍 一 
下 图 论 的 一 些 基 本 知识 、 图 论 中 常用 的 初等 方法 和 上 典型 的 图 论 程序 ,试图 在 抽象 理论 和 具 


Ul rapti po ad ERE. 


为 了 让 大 家 知道 这 本 书 主 变 讲 些 什么 ,我 们 先 举 几 个 例子 ，。 
[901] 图 1-1 画 的 基 一 个 “图 ”, 当 然 究竟 什么 碍 做 “图 ”以 后 还 要 仔细 讲 。 这 里 只 


图 1-1 


要 先 记 住 ,我 们 研究 的 图 , 指 的 是 由 顶点 和 线 组 成 的 图 

形 。 我 们 先 把 图 1- 

1 看 成 是 一 个 公路 网 ,Vi,V,,"…,V wo 是 一 些 城镇 ,每 条 

线 旁 边 的 数字 代表 这 一 段 公路 的 长度。 现在 问 ,要 从 
V 把 货物 运 到 Vio, 走 哪 条 路 最 近 ? 

这 个 问题 通常 叫做 最 短路 径 问 题 , 读 者 不 难看 出 ， 

这 是 一 个 有 很 大 现实 意义 的 问题 , 它 不 仅 出 现在 各 种 

运输 问题 中 ,而且 在 电路 设计 等 问题 中 也 有 用 。 因 为 这 


种 问题 研究 的 是 从 V 到 Vis 的 所 有 路 径 中 , 呢 一 条 路 最 短 ? 因此 它 是 一 个 极 天 极 小 问题 ， 
即 极 值 问题 ,而 它 又 和 一 个 “ 园 ” 密 切 联系 着 ,因此 这 种 问题 就 叫做 图 论 中 的 概 值 问题 。 
[002] 还 是 把 图 1-1 看 成 公路 网 ,Vi,V;,…,Vio 用 成 公路 网 的 一 个 站 点 ,着 这 个 公 
路 网 目前 被 敌 方 占领 .请 分 析 一 下 ,能 否 仅 破 坏 其 公路 网 的 一 个 站 点 或 者 至 少 破坏 敌人 哪 
几 个 站 点 ,就 可 摧毁 敌 方 整个 运输 线 。 
这 类 问题 称 为 图 的 连通 性 问题 。 原 来 的 公路 网 ,任意 两 个 站 点 之 间 互 相 可 达 , 这 样 的 
图 称 作 连 得 图 .一 旦 期 去 一 些 ( 或 一 个 ) 点 以 及 和 它们 关联 的 边 时 ,这 张 图 就 不 再 成 为 一 张 
完整 的 连通 图 了 . 因此 也 有 人 把 这 种 问题 叫做 “ 割 点 "问题 。 军事 指挥 中 这 类 问题 就 很 多 ， 
上 面 二 个 问题 都 是 明显 地 和 一 个 图 联系 着 的 。 让 我 们 再 来 讲 一 个 例子 ,从 表面 上 看 ， 
它 与 图 并 没有 什么 关系 ,但 经 过 仔细 分 析 , 可 以 把 它 归 结 为 图 论 中 的 一 个 匹配 问题 。 
[031 飞行 大 队 有 若干 个 来 自 各 地 的 驾驶 员 ， 


专门 驾驶 一 种 型 号 的 飞机 ,这 种 飞机 每 架 有 两 个 驾驶 
员 。 由 于 种 种 原因 ,例如 相互 配合 的 问题 ,有 些 驾驶 员 
不 能 在 辐 一 架 飞 机 上 飞行 , 间 即 何 搭配 驾驶 员 , 才 能 使 
出 航 的 飞机 最 多 。 

为 简单 起 见 , 假 设 有 10 个 驾驶 员 , 图 1-2 中 的 了 ， 


Vrat Vo 就 代表 这 10 个 驾驶 员 , 加 果 两 个 人 可 以 同 机 飞行 ,就 在 代表 他 们 两 全 之 间 连 一 
茶 线 ;两 个 入 不 能 同 机 飞行 ,就 不 连 , 例如 Vl 和 VY 可 以 同 机 飞行 ,而 V. £0 V. RIT. b 
了 这 全 图 后 , 坏 可 以 研究 措 配 飞行 员 药 问题 了 , 图 1-2 中 画 的 3 条 粗 线 就 代表 了 一 种 搭配 
方案 。 由 于 一 个 飞行 员 不 能 同时 派 往 两 捐 飞 机 ,因此 任何 两 条 粗 线 不 能 有 公共 的 端点 , 今 
此 我 们 把 一 个 图 中 没有 会 共 端 点 的 一 组 线 叫 敌 一 个 "匹配 ". 这 样 定义 以 后 ,上 面 问题 就 践 
为 :如 何 找 一 个 包含 最 多 线 的 匹配 ? 这 个 阿 题 叫做 图 的 最 大 匹配 问 征 。 请 大 家 试 试看 ,能 
不 能 从 图 1-2 中 找 出 一 个 包含 4 条 线 的 匹配 ,再 试 试 能 不 能 找到 包含 5 条 线 的 匹配 。 

像 上 述 例 子 那样 .将 实际 生活 中 的 事物 分 析 转 化 为 图 论 问 题 的 实例 还 很 多 .后面 还 要 
讲 , 这 里 就 不 多 介绍 了 。 

现在 可 以 把 这 本 书 的 目的 说 一 说 了 ， 

这 本 书 主要 是 围绕 一 些 有 趣 的 数学 难题 .计算 机 竞赛 试题 展开 对 图 沦 的 讨论 , 讲 它 们 
是 怎么 从 实际 生活 中 提炼 出 来 的 ,怎样 通过 编程 求解 这 些 问 题 。 哪 些 何 题 已 有 和 精 兢 的 解 
答 , 哪些 仅 是 近似 算法 。 当 和 然 本 书 不 可 能 穷尽 多 论 知识 ,只 能 选 一 些 比较 基本 的 来 讲 讲 。 重 
点 是 放 在 编程 解 是 和 实际 应 用 上 ,限于 箱 幅 ,对 一 些 编 程 过 程 中 未 涉及 的 抽象 定理 只 能 居 
简单 的 介绍 而 不 再 推导 .市 面 上 有 关 图 论 知识 的 教科 书 和 普及 读物 营 多 ,有 兴趣 的 读者 可 
查阅 这 方面 的 资料 。 


1.2 图 的 定义 


图 论 研究 的 对 象 是 图 ,什么 是 图 嘴 ? 
图 1-3 就 是 一 个 图 , 它 有 洪 干 个 不 同 的 点 VV V1, 我 们 称 之 为 硕 点。 这些 顶点 
中 有 一 些 是 用 直线 段 或 曲线 段 连接 的 ,我 位 把 这 
些 直 线段 和 曲线 段 称 作 这 .向 如 Vi 5j V. 之 闻 有 
两 条 边 . 若 连 接 两 个 顶点 的 边 有 多 条 ,出 这 些 边 称 
之 为 平行 过。V: 与 了, 之 何 有 一 条 边 ,W 与 V 之 
间 没 有 边 …*… 等 等 。 图 1-3 中 ,V 与 Vi RE 
边 相 连 , 这 样 的 边 叫 做 环 。 尖 然 ,也 可 能 出 现 其 顶 
.点 与 图 中 除 它 外 的 每 一 顶点 殉 不 相连 的 衫 况 ,这 
种 醒 点 称 为 孤立 点 ,例如 Yi 。 
由 此 得 出 图 的 定义 ; 
冉 若 干 个 不 辐 顶 点 与 连接 其 中 某 些 藉 点 的 边 所 组 成 的 图 形 就 称 为 图 。 
机 注意 的 是 ,在 阴 的 定义 中 ,顶点 的 位 置 以 及 边 的 曲直 长 类 都 坚 无 关 紧 要 的 ,而 且 也 
役 红 假定 这 些 顶 点 和 边 都 要 在 一 个 平面 内 { 璧 如 说 ,正光 面体 的 项 点 和 械 也 构成 一 个 图 )。 
我 们 只 关心 顶点 的 多 少 及 这 些 边 是 连结 专 些 顶点 的 。 确 蕊 地 说 , 姑 果 两 个 图 台 与 他 的 项 
点 之 简 可 以 建立 起 一 对 一 的 对 应 ,并且 当 且 仅 当 厂 的 顶点 久 与 蕊 之 间 有 KK 条 边 相连 
的 ,人 ?的 相应 的 顶点 U; 与 ;之 间 也 用 条 边 相连 ,我 们 就 说 6 与 C 有 相同 的 结构 , 简称 
HAHA. MAHATA RAAHEEN. 
[8 1-4 与 图 1-3 乍 看 起 来 很 不 一 样 , 其 实 这 两 个 图 却 是 相同 的 ,这 只 要 将 图 1-4 中 的 
» a 4 


顶点 六 与 图 1-3 中 的 V, 相对 应 (1<; 委 11? 就 明白 了 。 

通常 用 一 个 大 写字 和 母 G 来 表示 图 ,用 V. 来 表示 所 有 项 
点 的 集合 ,五 玫 示 所 有 边 的 集 台 ,并 且 记 成 G—(O ED, 38 
果 顶 点 个 数 iV1 与 边 的 条 数 |E| 都 是 有 限 的 ,图 G 就 称 为 
有 限 图 。 如 果 |7|=1,| 玉 | 一 0, 图 G 称 为 平凡 图 。 这 种 仅 舍 
一 个 各 立 点 的 医 是 有 限 图 的 一 种 特例 ,如 果 |7| 或 | 呈 | 是 无 
限 的 ,图 G 称 为 元 限 图 。 

本 书 讨论 的 图 形式 都 是 有 限 图 。 

如 果 对 图 G— (E) G' =V E ),G' BITIGR E EG 
的 顶点 集 的 一 个 子 集 (7'STVD),C' 的 边 集 是 G 的 边 集 的 一 个 子 集 (四 己 EE) ETUR GJ G 
的 子 图 。 例如 ,一 个 正方 形 就 可 以 看 作 是 图 1-5(a? 的 一 个 子 图 ,一 个 五 边 形 也 可 以 看 作 是 
图 1-5( 扩 的 一 个 子 图 。 

如 果 一 个 图 没有 环 ,并且 每 两 个 顶点 之 间 最 多 只 有 一 条 边 , 这 样 的 图 称 之 为 简单 图 。 
在 简单 图 中 ,连接 V 55 V, 的 边 可 以 记 成 (Vi,V;)。 

如 果 忆 是 一 个 简单 图 ,并且 每 两 个 顶点 之 间 都 有 一 条 这 ,我 们 就 称 G 为 完全 图 , 通常 
HRA n 个 顶点 的 完全 图 记 为 K. Mma 1-5 人 9) 就 是 一 个 完全 图 KK;。 

如 果 避 是 一 个 简单 图 , 它 的 顶点 集合 Y 是 由 两 个 没有 公共 元 素 的 子 集 多 = (XX 
eX, Sg Y —(YuYu Y ARA E X5 XO jm. Y, 5 Yatma 
闻 没 有 边 连 接 , 则 G 叫做 二 分 图 。 


H 1-4 


Bl 1-5 图 1-6 
Wig 4MGm.gXI—-N.IY|I—M.&— T X;€ X ít Y, eY 有 一 条 边 相 
XE, G 叫做 完全 二 分 图 , 记 为 Kou. HALE 1-6 为 完全 二 分 图 K;,,。 
WE C 是 一 个 尺 个 顶点 的 简单 图 ,从 完全 图 天。 


《如 图 1-5(5)) 中 把 属于 局 的 边 全 部 去 掉 后 ,得 到 的 图 称 

为 G 的 补 图 ,通常 记 为 ,例如 ,图 1-7(a) 的 补 图 C 为 图 

1-70). 
C 
(四 


显然 CG 一 G。 即 一 个 图 的 补 图 的 补 图 就 是 原来 的 那 » 
^H. | 
直面 我 们 还 要 介绍 一 下 相 邻 与 次 数 这 两 个 术语 。 图 17 
如 果 图 G 的 两 个 顶点 V, 与 V, 之 间 有 边 相连 ,我 们 就 说 V. 55 V, 是 相 分 的 ,否则 就 说 
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V; 55 V; 是 不 相 邻 的 。 如 果 顶 点 是 边 e 的 一 个 端点 ,就 说 顶点 Y 与 边 e 是 相 邻 的 ,e 是 从 
V 引出 的 边 。 从 一 个 顶点 Y 引出 的 边 的 条 数 , 称 为 了 的 度数 , 记 作 dCY)。 例 如 图 1-50» 
Tf. =d (V) =d V =d EdV) =m, Hl 1-6 中 的 47:) 一 2, 等 等 。 

以 后 ,我 们 把 每 个 顶点 的 次 数值 为 常数 下 的 图 叫做 天 度 正则 图 。 我 们 也 经 常 使 用 下 
面 两 个 符号 ， 

& = min (4(V))} ; 妈 所 有 顶点 的 次 数 移 最 小 信 为 Ss 


A= max (2(V2) , 即 所 有 顶点 的 次 数 的 最 大 值 为 A. 


我 们 可 以 从 顶点 次 数 问题 的 讨论 中 ,引出 一 些 有 趣 的 结论 : 
1. $jd(V) 一 2X |E]; 
VEV 


2. 对 于 任意 的 图 G, 奇 次 顶点 的 个 数 一 定 是 偶数 
这 两 个 结论 可 以 帮助 我 们 分 析 一 些 向 题 。 

【 例 11 空间 是 否 有 这 样 的 多 面体 存在 ,它们 有 奇数 个 面 , 而 叔 个 面 又 有 奇数 条 边 ? 

分 析 ; 构 作 一 个 图 ,以 面 为 顶点 , 当 且 仅 当 两 个 面 有 公共 楼 时 , 则 在 G 的 相应 两 顶点 
间 连 一 条 边 , 得 到 图 C. 依 题 意 ,图 的 顶点 个 数 是 奇数 ,而 且 每 个 顶点 的 度数 dCV) 是 奇数 ， 
从 而 22402 也 是 奇数 ,与 结论 1 相 违 , 故 这 种 多 面体 不 存在 。 


{ 例 23 晚会 上 大 家 握手 联欢 , 问 是 否 会 出 现 握 过 奇人 次 手 的 人 是 奇数 的 情况 ? 

分 析 : 构 作 一 个 图 ,以 人 为 顶点 ,两 人 扎 手 时 , 旭 相 应 的 两 个 顶点 之 间 连 一 条 边 ,于 是 
每 人 手 手 的 次 数 即 相应 顶点 的 次 数 。 由 结论 2, 奇 次 顶点 的 个 数 总 是 偶数 ,所 以 握 过 奇 次 
手 的 人 数 是 奇数 的 情况 不 可 能 出 现 。 


1.3 道路 与 回路 


1736 年 数学 家 欧 拉 (Evier 1707 一 1783) 发 表 了 一 篇 论文 ,解决 了 著名 的 七 桥 问题 ， 
这 一 节 , 我 们 就 来 谈 谈 七 桥 癌 题 及 一 些 有 关内 容 。 

一 条 河 从 城市 穿 过 ,河中 有 两 个 岛 4 与 D, 河 上 有 七 认 桥 ,连接 这 两 个 岛 及 河 的 两 岸 
B,C( 图 1-8(a))。 


HE 
(OD 一 个 旅行 者 能 否 经 过 每 座 烽 怡 好 一 次 , 既 无 重复 也 无 遗漏 ? 
PE" 


(2) 能 香 经 过 每 座 桥 答 好 一 次 ,并 且 最 后 能 够 回 到 原来 出 发 点 ? 

我 们 把 图 1-8Cao PCI ER T PE] 1-8(6) 所 示 的 图 ,4,8,C,DD 变 成 四 个 点 ,七 座 桥 变 成 七 
条 边 ,七 桥 向 题 就 变 成 通常 所 说 的 一 笔画 向 题 :能 和 否 一 笔 柄 出 这 个 图 (每 条 边 都 无 遗 油 ,也 
无 重复 地 画 到 )? 或 能 否 一 笔画 出 这 个 图 .并 且 最 后 可 以 阿 到 原来 的 出 发 点 ? 

为 了 叙述 方便 及 今后 的 需要 ,我 们 再 引入 儿 个 概念 ， 

在 图 G 中 ,一 个 由 不 同 的 边 组 成 的 序列 ere: TNT ei 是 连接 Vi 一 1 与 Vi(i=1， 
2,，…,8) 的 ， 我 们 就 称 这 个 序列 为 从 V. 到 ys 的 一 条 道路 , 数 & 称 为 路 长 ,Vo 5 V, WA 
这 条 道路 的 两 个 端点 ,YI<SESE 一 1 叫做 道路 的 内 点 。 如 果 避 是 篇 单 图 ,这 条 道路 也 可 
EEV o Vi ，…，Vs)。 

例如 ,图 1-9 H se rezes resres se, 组 成 一 条 道路 。 

注意 在 道路 的 定义 中 ,并 不 要 求 Y。 £ V, 互 不 相同 。 如 果 V, 和 
E V, 互 不 相同 ,这 样 的 遵 路 称 为 轨道 , 记 成 PAV,V,)。Vo 一 Vs 的 es V es 
Ful ciel E , Vo= V, HAER, 长 为 K 的 图 叫做 下 阶 图 .不 fs 
难看 出 ,如 果 有 一 条 从 V 到 人 的 道路 上 去 掉 若 于 个 回路 , 便 可 得 
到 一 条 从 V 到 V' 的 轨道 。 & 1-9 

U,V PET ARS ES BE d dé U, V 间 最 短 轨 道 的 长 度 , 记 作为 
DIU,V), 若 U 与 V 之 间 存 在 道路 , 则 称 U 与 V 相连 通 . 图 G 中 任意 两 个 顶点 皆 连 通 时 ， 
称 G 为 连通 图 。 

利用 道路 (回路 ?的 概念 ,图 能 理 一 笔画 成 (并 且 回 到 原 出 发 点 ) 的 问题 ,就 等 价 于 这 个 
图 是 不 是 一 条 道路 (回路 )? 

MRA GERA V, 到 ,的 道路 ,那么 该 条 道路 上 的 每 一 个 内 点 Vi(1&iSg 一 1) 
都 是 度数 为 偶数 的 顶点 。 因 为 对 V 来 说 ,有 一 条 进入 V 的 边 , 就 有 一 条 从 VV, 引出 的 边 ， 
而 且 进 出 的 边 不 能 重复 已 走 过 的 边 , 所 以 与 V; 相 分 的 边 总 是 成 双 的 。 故 图 G 至 多 有 两 个 
奇 顶 点 , 即 Y。 与 了。 如 果 怠 是 一 条 回路 ,那么 根据 上 面 推理 ,Y。 与 Vs 的 度数 也 是 偶数 。 
由 此 ,我 们 可 以 引出 下 面 一 个 结论 : 

有 限 图 G 是 一 条 道路 ( 即 可 以 一 笔 耶 成 ?的 充分 必要 条 件 是 G 是 连通 的 , 且 奇 顶点 的 
个 数 等 于 0 88 2, 并 且 当 且 仅 当 奇 顶点 的 个 数 为 0 时 ,连通 图 鼠 是 一 条 回路 (孤立 点 可 以 
看 作 是 回路 )。 

显然 ,由 于 图 1-800 008 4 个 奇 斋 点 ,因而 不 能 一 笔画 成 , 即 一 个 旅行 者 要 既 无 重复 
也 无 遗漏 地 走 过 图 1-8 他 ?中 的 七 座 桥 是 不 可 能 的 。 

如 果 你 再 深入 地 探讨 一 下 一 笔画 的 内 涵 , 还 可 以 引伸 出 下 述 一 些 结论 ,我 们 可 以 借助 
这 些 结 论 来 分 析 实 际 间 题 : 


L 若 连 通 图 G 有 2K 个 奇 顶点 ,那么 历 怠 可 以 用 天 笔画 成 ,并 且 至 少 用 天 笔 才能 画 
成 。 


例如 ,图 1-8(56) 有 4 个 奇 顶 点 ,该 图 可 以 用 2 笔画 成 :其 中 一 种 方案 是 ， 


第 一 笔画 : 8 一 -一 DD 一 
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A———C 
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t fg 


第 二 笔画 : C A B A 


2. 如 果 图 G 有 两 个 奇 顶点 ,天 个 耳 相 没有 公共 顶点 的 连通 子 图 ,那么 图 G 可 以 分 解 
成 天 一 1 条 回路 和 一 条 道路 。 


例如 图 1-10 中 有 两 个 青 顶 点 V: 和 Ts、 两 个 分 支 (Y Va Va 
Vll Vs. 

图 G 可 以 分 解 成 ， 

1 条 回路 :Kelyesyez)# 

1 条 道路 ; (es ,es yes erse)。 


3. C 为 二 分 图 的 充分 必要 条 件 是 G 中 无 奇 顶点 。 


例如 有 一 只 老鼠 在 3X3X3 的 乳酪 块 上 咬 出 一 条 洞 ,这 个 润 通过 1]X1Xx1 的 27 个 小 
立方 体 的 中 心 , 它 从 大 立方 体 的 一 角 咬 起 ,只 要 还 有 它 没 尝 过 的 小 点 心 块 ,就 继续 向 前 咬 。 
问 这 只 老鼠 能 否 在 3x 3x 3 立方 体 中 心 停止 ? 设 这 只 老鼠 是 从 一 个 1xX1X1 的 小 立方 体 
中 心 沿 侧面 正 交 药方 向 商 另 一 未 跑 过 的 小 点 心 扎 的 中 心 咬 去 的 。 

分 析 : 以 1x1Xx1 的 小 立方 体 为 顶点 构 作 一 个 图 ,把 3xX3X3 立方 体 中 心 那 块 小 立方 
体 与 开始 被 咬 的 小 立方 体 之 间 连 一 条 边 ,再 把 有 公共 侧面 的 小 立方 体 连 上 边 :! 以 8 个 角 上 
及 6 个 和 侧面 中 心 处 的 小 立方 体 为 下 集合 ,其 余 的 小 立方 体 为 了 集合 ,于 是 构成 一 个 二 分 
图 。 由 结论 3, 此 图 不 会 有 27 阶 图 ,所 以 老鼠 不 会 停留 在 3X3X3 立方 体 的 中 心 。 


1.4 B 


[91 11. 《红楼 梦 3》 中 荣 国 府 的 世系 图 如 下 ( 见 图 1-110202: 


图 1-10 


此 国府 Vi 
| | 
HRE Vz 
元 页 政 vw ^y 
| 一 | ZIN 
HE Hk WREE WH Vs Ve V; Vs 
| Í | | 
H= WH Vy Vi 
(a) (pb) 
图 1-11 


如 果 将 每 个 人 用 一 个 顶点 来 表示 ,并 且 在 父子 之 关连 一 条 边 , 便 得 到 )*| 1-11(6)。 
这 种 图 称 为 树 , 因 为 它 的 形状 很 像 一 棵 倒 悬 的 树 。 
现在 我 们 给 出 树 的 定义 ; 
没有 图 的 连 道 图 称 作 树 , 通 常用 了 表示 .TT 中 QV)=1 的 顶点 叫做 叶 ; 每 个 连通 分 支 
绾 为 树 的 图 叫做 森林 ,孤立 的 顶点 叫做 平凡 树 。 
“6* 


图 1 12 是 一 个 森林 ,每 个 连通 分 支 皆 为 针 。 


上 和信 本 大大 


图 112 


TE RAAR T ACE o XS [a 9 E LR REG — 1 PRETI GE. 
WERT AMERY N ALEI M= NN 一 141 倒 过 来 ,一 个 其 有 个 店 由 二 
N—1 ski iie 36 PG. xg JE — HERE. 
守信 具有 以 下 人 性质， 
L 在 了 中 去 掉 一 边 后 所 得 的 图 G ETE 99; 
2. 了 添加 一 条 廊 后 所 得 的 医 G 一 定 有 轿 ， 
3 下 的 每 一 对 顶点 Y 5 V'TWRBOS-—dX EHE. 
设 避 县 一 个 连通 图 ,如 果 中 有 加 ,我 们 在 这 个 图 中 去 披 一 条 边 , 得 到 的 人 还 是 连通 
的 ,如果 咏 仍然 有 图 ,再 在 陋 中 去 撞 一 条 边 得 连通 图 C,………, 这 祥 继 续 下 去 ,最 后 得 到 一 
个 料 了 ,了 与 上 的 项 点 是 相同 的 ,并 且 从 了 陆续 深 加 一 些 边 就 得 到 G。, 具有 这 样 性 质 的 笠 
PAREMA CG HERH. MA G PARR T 的 边 得 到 的 子 图 称 为 上 的 余 树 
例如 图 1-13 中 的 粗 边 使 槐 焉 该 图 的 一 个 生成 


T ,而 细 这 使 是 余 钳 了 过。 可 见 余 娃 可 能 不 连通 。 ~ 
一 个 具有 个 项 点 的 完全 图 K, 可 以 产生 NW" “个 a d ye 
不 同 的 树 。 A 
本 章 只 是 图 论 的 一 个 开头 . 刚 起 步 就 贸 出 这 么 多 "ER. 


的 概念 ,术语 和 符号 ,以 后 各 章节 将 会 讲述 这 些 概念 的 

应 用 。 图 论 的 概念 为 数 其 多。 为 了 加 强 理解 读者 可 以 参阅 图 论 的 其 他 书籍 .但 大 可 不 党 
罗 记 硬 背 。 束 多 画 未 浮 图 ,从 正 反 两 个 方面 把 本 质 的 和 淘 于 误 逻 的 地 方 摘 消 楚 ,而 且 要 学 
会 用 。 


T 


第 二 章 ” 求 最 短路 径 的 算法 及 应 用 


2.1 求 最 短路 
一 、 什 么 是 最 短路 问题 


这 一 章 先 讲 一 个 比较 简单 但 又 是 很 重要 的 问题 一 一 最 短路 问题 。 这 个 问题 有 着 大 量 
的 生产 实际 的 背景 。 事 实 上 大 至 海陆 空 各 种 运输 ,小 至 一 个 人 每 天 上 班 ,都 会 遇 到 这 一 问 
题 ,甚至 有 些 问题 从 表面 上 看 与 最 短路 问题 没有 什么 关系 , 却 也 可 以 归结 为 最 短路 喇 题 。 
下 面 就 举 一 个 这 样 的 例子 。 

(6011 访 河 问题 。 一 个 人 带 了 一 只 狼 一 只 羊 和 一 棵 白菜 想 要 过 河 , 河上 有 一 只 独 
木船 ,每 次 除了 人 以 外 ,只 能 带 一 样 东西 。 另 外 如 果 人 不 在 旁 时 狼 就 要 吃 羊 , 羊 就 要 吃 白 
菜 。 问 应 谈 怎 样 安排 渡河 ,才能 做 到 既 把 所 有 东西 都 带 过 河 ,在 河 圭 来 回 的 次 数 又 最 少 ? 

我 们 设 变量 MRA W 代表 贸 ,S 代表 羊 ,7 代表 白菜 ,@ 代表 空 , 什 么 都 没有 。 开 
始 时 设 人 和 其 它 三 样 东西 在 河 的 左岸 ,这 种 情况 用 MWSV X. 

我 们 用 一 个 集合 表示 目前 左岸 的 情况 。 很 显然 ,可 能 出 现 的 情况 有 16 种 : 

[LMWSV], LMWS], [MWV], [MSY], 

LWsv 1, [MW ]. [MS], [MV]. 

[WS], twv), [sv]. [M]. 

LW]: [5], [v], [e]. 

BIER THE 6 种 可 能 发 生 狼 吃 羊 . 羊 吃 白 菜 的 情况 ， 

[WSV], [MW], [MV ], (Ws) [SV] [M]. 

现在 我 们 就 来 构造 一 个 围 G, 它 的 顶点 就 是 剩 下 的 
10 种 情况 ，G 中 的 边 是 按 下 述 原则 来 连 的 : 恕 果 经 过 一 wwsv MWS MWV MSV MS 
次 小 河 ,情况 甲 可 忆 变 成 情况 乙 ,那么 就 在 情况 甲 与 情况 
乙 之 间 连 一 条 边 ( 见 图 2-D. 作 了 图 G 以 后 , 访 河 的 问题 
就 归结 为 下 述 问 题 了 :在 与 中 找 一 条 连 接 顶 点 MWSV wv w 5 Vv 9 
与 加 ,并 且 包 合 边 数 最 少 的 路 .如果 我 们 设 G 中 各 边 的 长 图 2-1 
ERE 1, 那么 也 可 迟 把 渡河 问题 归结 为 ,“ 找 一 杂 连 接 
MWSV 与 外 的 最 短路 ”。 把 问题 转化 为 图 论 后 ,就 可 用 一 种 系统 的 方法 解决 ;而 不 是 通常 
人 们 所 用 的 次 的 方法 和 凭 经 验 的 方法 。 

下 面 ,我 们 可 以 给 最 短路 问题 下 一 个 抽象 的 定义 ， 

1. 求 有 向 图 (图 中 从 一 个 顶点 连 到 相 分 顶点 的 边 有 方向 性 ) 的 最 短路 问题 

设 G=(V ,A4) 是 一 个 有 问 图 , 它 的 每 一 条 强 A 都 有 一 个 非 负 的 长 上 度 LCAD EG P 
指定 一 个 顶点 TV EDRIR V. 到 如 的 每 一 个 顶点 Vj 的 最 短 有 向 路 找 出 来 (或 者 指出 不 
FEA V, 到 了 PU magi BI V, RR V. 

8» 


2. 求 无 向 图 (图 中 连接 两 个 顶点 的 边 无 方向 性 ) 的 最 短路 问题 

设 G=[V,E] 是 一 个 无 向 图 , 它 的 每 一 条 边 。 都 有 一 个 非 负 长 度 Z(ez)。 在 G 中 指定 
一 个 顶点 V. ERIE V. P G 的 每 一 个 顶点 V; 的 最 短 无 向 路 找 出 来 (或 者 指出 不 存在 
M. V. 8] V, 的 无 向 路 , 即 了 ,不 可 达 V.D. 


一 、 求 最 短 有 向 路 的 标号 法 


所 谓 标号 ,是 指 与 图 的 每 一 个 顶点 对 应 的 一 个 数字 。 设 ; 
bCG—— TR V, 的 标号 ,代表 的 是 了 , 到 v, 的 最 短 的 长 度 , Vi 已 标号 则 意味 着 ,到 
V, 的 最 短路 以 及 这 条 路 径 的 长 度 已 经 求 出 。 显 然 初 始 时 5G) —0. 
LG, D—3E CO, VVK ERKE. 
KG, 一 当前 有 向 路 坟 入 统 CVi,V) 后 性; 到 Vj 的 有 向 路 长 度 。 
标号 法 的 算法 流程 如 下 ， 
o 


omm 存在 起 aciem PERATA N 
] 
f 
| 


对 上 述 的 每 Mace. 万 计算 
KG, D-—bG T 1G D1 


de ie Ko, DS MEL GJ 
GE. FOR EGUL.MKU, DRAEN, PER- 条 ) 


Kb Ke; 
| Y " 
还 有 未 标号 的 就 N 
由 标号 法 的 算法 流程 可 以 看 出 ,标号 法 采用 顺 推 的 方法 ,每 边 检 测 一 次 ,没有 重复 的 
回 湖 搜 索 ,因此 是 一 种 最 佳 算法 。 
注意 几 个 向 题 ， 
L 若是 有 向 图 的 最 短路 问题 , 则 用 下 述 两 种 方法 求解 ， 
Q2 将 图 的 每 一 条 边 修 改 为 两 条 方向 相反 的 弧 , 构 成 有 向 图 G' ,然后 直接 用 标号 法 求 
gp. 
(2) HE HR Ro. 
O &T2bSUPILC XL 0 INT CE" FERA Vi Ebr mE SES V, Rin an" 
改 为 “存在 一 端 已 标号 而 男 一 端 末 标 号 的 边 " 就 可 以 直接 在 无 向 图 上 求 最 短路 了 。 
2. 如果 只 要 求 , 到 某 顶点 V; 最 短路 ,那么 也 可 以 在 V, 得 到 标 导 后 就 结束 计算 。 


3. 若 计算 结束 ,还 有 一 些 未 标号 的 顶点 。 则 肯定 了 , 到 这 些 顶 点 的 有 向 路 或 无 向 路 不 
存在 Li 


三 , 标号 法 程序 


program shortest. way: 


uses crt; 
const maxn = 100, 
type list 一 array[ 1. . maxn] of integer; 


var — chart ! array[ 1. . maxn ] of list; { 有 向 图 的 领 接 和 矩阵 } 
mark + artay[1. . maxn | of boolean: 
{ 标志 
TE us Vi 至 Vi 的 最 短路 径 已 求 出 } 
(mark[ij ene V, 至 Vi 的 最 短路 径 未 求 出 ， 
bi list; 
{ bli] — V: 到 Vi 的 最 短路 径 长 度 } 
n * integer; { 硕 点数 } 


procedure init: 
var i; ja, k + integers 
begin; 
clrscri 
repeat writeCnz)5 { 输入 项 点 数 } 
readIn(n) ; 
until (n2-0) and (n«maxn) i 
for i 1 =1 to n do 1 ME EPIA } 
for j: =1 to n do 
chart[1,j] : = 0; 
writeCnomber of lines « 3 { 输入 边 数 } 
readIn(a) p 
fot k : =] to a do ( $6 £I E) 
begin 
read (i); 
read(j); 
readin (chart [isj]; 
end, 
fori:—2tondo (标志 表 初 始 化 } 
mark[i] : —false; 
mark[1]: —trues i JA V, 顶点 出 发 搜索 } 
b[1]:—0; 
end; 
procedure main; 


vat best, { 最 短路 径 代 价 } 
beat_j， { 当前 的 最 得 路 径 的 端点 序号 -d 
i,j ! integer; 
begin 


repeat best 1 —0, 
for i: —1 ton do 
(A Erie d p S LE e iR RELATED obest. D, } 
14 V, Z best_j 的 路 径 长 度 最 短 } 
if mark[i] then 
(V, 至 Vi 顶点 的 最 短路 已 求 出 , 即 起 点 已 标号 } 
for j:—1 to n do 
if (not mark[j]? and &ehart[i,j]770) then 
if (best-—0) or (b[1]4-chart[ ij] best? 
{ 存在 一 条 终点 未 标号 的 张 (Vi,Vi) 且 V, 至 Vi 的 路 目前 最 短 } 
:1O" 


then begin 
best : 一 b[i 十 chart[i 3 
Cia FE mm i 


best_j 1! =i 
end; 
if best>0 then ( 若 最 短路 存在 } 


begin 
blbest_i] : — best: 
{ 记 下 Vi 至 best-j 的 路 径 代价 ,并 设 best-j 访问 标志 } 
mark[best.1] : —true; 
end; 
until best -—-0, ( 直至 V, 至 其 它 可 以 达到 的 顶点 的 最 佳 路 径 求 出 ) 
end; 
procedure show; ( 打印 路径 代价 } 
var i ! integer; 
begin 
for i* =1 to n do 
write(b[i]* 4); 
writeln; 
end; 
begin 
init; ( 输入 图 》 
mains ( OR V, 至 其 它 可 以 到 达 的 顶点 的 最 短路 径 } 
show: { 打印 结果 } 


end. 


2.2 服务 点 设置 问题 1 一 一 求 图 的 中 心 
一 、 服 务 点 设置 问题 的 第 一 个 标准 


服务 点 设置 问题 的 一 般 提 法 是 , 设 G— [V ,Ej 是 一 个 连通 欧 无 向 图 ,在 它 各 个 顶点 V 
上 ,有 一 些 服务 对 象 (例如 中 小 学 生 ) 现 在 要 设置 一 个 服务 点 (例如 学 校 ), 癌 服务 点 设 在 台 
哪 一 个 顶点 上 最 好 ? 

在 研究 这 类 问题 时 ,首先 要 解决 的 是 好 坏 标准 隆 题 .现在 我 们 设 定 一 个 标准 一 一 就 近 
人 学 ,就 是 在 来 上 学 的 学 生 中 ,以 最 远 的 学 生 走 的 路 程 为 标准 。 或 者 说 最 远 的 服务 对 象 与 
服务 点 的 距离 应 尽 可 能 小 。 这 一 节 就 讨论 在 这 种 标准 下 ,如 何 求 最 好 服务 点 的 问题 。 

设 G=[V ,是 一 个 连通 的 无 向 图 ,每 一 条 边 E 有 一 个 非 负 的 长 度 LCE,)。 现 在 任 
取 一 个 顶点 Vo SUB S V, 5 G 的 所 有 点 之 加 的 最 短路 的 长 度 ， 

AV 4, V VV dV Va) 

4X N 个 距离 中 的 最 大 数 称 为 V; 的 最 大 服务 距离 , 记 敌 elV,), 它 的 实际 意义 很 清楚 ， 
如 果 把 服务 点 设 在 Vi 那么 这 个 最 务 点 与 最 远 的 服务 对 象 间 的 距离 至 少 是 e(T,)。 

在 所 有 顶点 中 ,使 (8,)? 达 到 最 小 的 顶点 叫做 图 G 的 中 心 。 如 果 以 最 大 服务 距离 的 大 
小 作为 好 坏 的 标准 ,那么 ,服务 点 以 设 在 中 心 为 最 好 。 


二 , 图 中 心 的 计算 


要 求 图 的 中 心 ,首要 的 是 构造 一 张 NXN 的 表 。 图 的 任意 二 个 顶点 之 间 的 最 短路 集 
。11 。 


中 写 在 这 表 2-1 上， 
8 2-1 


LinIm[- [v |- Ive 


其 中 第 EO SUSLNOTROR V. 到 各 个 顶点 的 最 短路 的 长 度 d GL D OS S NDLIERE 
:dG,£—0, SS 5 一 0, 用 一 次 标 导 法 将 该 行 上 V; 至 其 它 N 一 1 个 顶点 的 最 短 踏 求 
出 ,并 求 出 对 应 的 e(7,) 。 连 算 N 次 即 可 填 完 图 的 距离 煮 。 

例如 : 囊 2-2 是 对 应 的 臣 离 表 ,e(Y,) 写 在 表 的 最 右 列 。 


EEA 2-2 中 选 一 个 服务 点 ,那么 从 对 应 的 距离 表 2-2 可 以 看 出 , 设 在 Ye 最 好 , 因为 
eVe) 一 4.8 是 所 有 eV 中 最 小 的 。 

那么 怎样 求 一 个 图 的 中 心 呢 ? 这 个 问题 其 实 前 面 都 已 经 讲 了 。 下 面 再 来 总 结 一 下 ， 

259R d. 用 2. 1 节 讲 的 标号 法 求 出 图 C IE ER s 

步骤 2. 求 出 与 一 个 顶点 的 最 大 服务 距离 eV), eC OSRT FEES E53 V, 对 应 的 
行 中 的 最 大 数 ; 

E98 3. 求 出 使 elV.) 达 到 最 小 的 顶点 VV 就 是 图 的 中 心 。 

由 于 用 一 次 标号 法 可 以 求 出 一 个 顶点 至 其 它 项 点 的 最 短路 长 度 , 因 此 只 要 在 标号 法 
内 增添 少许 语句 , 便 可 求 出 这 个 顶点 的 e(V;) 值 ,步骤 1,2 实际 土 是 连 算 几 次 标号 法 , 剩 下 
的 步骤 3 极其 往 单 ,只 要 大 约 进 行 n 次 比较 大 小 就 可 以 完成 了 。 大 部 分 工作 集中 在 计算 蜡 
离 表 上 .标号 法 求 距 离 表 的 效率 是 最 为 显著 的 ,因此 用 上 面 讲 的 3 个 步 又 来 求 图 的 中 心 也 
是 有 效 的 。 
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三 、 图 中 心 程序 


program find center. point} 


uses Ctt; 
const maxn = 100; { 数据 结构 类 同 求 最 短路 径 } 
type list = array[1.. maxn] of real; 
chart ı  array[1.. maxn] of list, 
var mark :  array[1..maxn] of boolean; 
b : list [! i 
n : integer; 


procedure init; 
var İsjsask ! integer: . 
begins 
clrscr; 
repeat write n="), {输入 顶点 数 } 
readln (n)s 

until (n2-0) and (n«cmaxn); 

for i: —1 to n do ( 邻接 矩阵 初始 化 } 
for j: =1 to n do 

chart[i,j] : =0; 
writeC number of lines: °; {输入 边 数 a} 


readln a); 
fork:—itoado !{ 读 入 邻接 矩阵 } 
begin 
read (1) ; 
read Cj) , 
readin chart[i.j ]): 
chart[j,i] : —chart(i;j]: 
end, 
end; 
function find. farest(x ! integer) ! real; CEE x 顶点 的 最 大 服务 距离 sfx)] } 
var best..j,i,j ! integer; { 最 短路 径 的 端点 序 配 , 辖 助 变量 } 
best ,farest ! real; (RAKA RAREN } 
begin 
fori: —1 to n do { 标志 去 初始 化 } 
mark[1] : —false; 
mark[x ] : —true; ( 从 x 顶点 开始 搜索 } 
b[x] :=0; 
farest ! —0; { etx) 霜 始 化 为 0 } 


repeat best 1 =0; 
fori*—1tondo 
{ AB E PL SLM RR SERERE BI 3E EL Gc best). ) 
(4E V, 至 best. i 的 路 径 长 度 最 短 } 
if mark[i] then ( V; BEA. GRE } 
for j : =} to n do 
if (not mark[j]? and (chart([i.j]2-0) then 
{ 车 终点 j 未 标号 且 连 接 (i,j) 后 使 VY 到 V, 的 路 径 最 短 } 
if (beat=0) or (b[i]--chart[ ij] best? 
{ 则 记 下 路 径 代 价 和 顶点 序 导 j,j 结 点 标号 } 
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then begin 
best : —b[i]--chart[i.j]; 
best.j : =j; 
end; 
if best>0 then 
begin 
hi hest .j] : —best; 
mark[hest..j ] + —true; 
if bestZ7farest 
{ VL BI Vu ;的 服务 距离 目前 最 大 , 则 记 下 ? 
then farest : —hest; 
end; 
until best = 0; 
(E V, 至 其 它 顶 点 的 最 短路 径 和 最 大 服务 距离 求 出 为 止 } 
find. farest + —farest, | 返回 最 大 服务 距离 } 
end, 


procedure main; 


var best i,i : integer; 
e best t real; 
begin 
best + =% 
fori : —1to n do { 求 出 各 顶点 的 最 大 服务 距离 的 最 小 值 } 
begin 


e ı =find_farest (i); { 求 项 点 i 的 最 大 服务 距离 } 
if Ce best) or (best—0) 
{ 著 该 最 大 服务 距离 为 目前 最 小 , 则 记 下 该 项 点 序号 和 它 的 最 大 服务 距离 } 


then begin 
best + 一 ef 
best.i : =i; 
end ; 
end; 
writelnC*center point : ",best D; (打印 图 的 中 央 点 } 
end; 
begin 
init, ( 输入 图 ) 
main, { 计算 和 输出 图 的 中 心 } 
end. 


2.3 服务 点 设置 问题 2 一 一 求 图 的 P 中 心 


—. 服务 点 设 痪 问题 的 第 二 个 标准 


仍旧 考虑 2. 2 节 中 讲 的 学 校 的 地 点 选择 问题 ,不 过 现在 不 是 设置 一 所 学 校 ,而 是 设 
置 两 所 。 问 设置 在 什么 地 方 最 好 ? 
和 前 面 一 样 ,首先 还 是 要 把 好 坏 标准 明确 一 下 ,仍旧 以 图 2-2 为 例 。 现 在 我 们 先 假设 
学 校 设 在 V: 和 Vs 两 个 地 方 。 这 时 ,对 于 住 在 Vi 的 学 生来 说 , 当 他 们 要 读书 时 ,当然 到 离 
V, 较 近 的 V, 去 上 学 ,因此 Vs 的 学 生 因 读书 ,至 少 要 走 3 公里 的 路 程 ,同样 的 道理 ,可 以 
“14. 


求 出 VasVss Vy 的 学 生 上 学 时 必须 走 的 路 程 ( 见 表 2-3). 
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从 表 2-3 最 下 面 的 一 行 中 还 可 以 看 出 , 当 学 校 设 在 V, 和 V: 时 , 住 在 各 地 的 学 生 上 
学 时 需要 走 的 路 最 多 不 超过 3 公里 。 我 们 把 这 种 情况 记 作 eCVs,Vs) 一 3。e Vs,Vs) 称 作 顶 
AXE VaV: 的 最 大 服务 距离 。 

又 例如 从 表 2.4 可 以 看 出 , 预 点 对 VV; 的 最 大 服务 距离 是 6. 3 , 即 eC, VO 
6.3, 和 e(V,, V2 —3 一 比较 ,就 可 以 看 出 设置 在 了 .Vs EBEE VV 好。 


表 2-4 


讲 到 这 里 ,好 坏 标 准 问 题 就 不 难 解决 了 ,我 们 可 以 规定 顶点 对 最 大 服务 忠 离 愈 小 印 
好 ,使 eCVi,V)) 达 到 最 小 的 顶点 对 称 为 图 的 2 中 心 。 因 此 ,要 研究 哪 两 个 顶点 设置 学 校 最 
好 ,就 归结 为 求 图 的 2 中 心 了 。 

图 的 2 中 心 这 个 概念 还 可 以 推广 , 即 可 以 考虑 图 的 3 中 心 ,图 的 4 中 心 ,…"… 或 者 一 
般 地 说 可 以 考虑 图 的 己 中 心 。 在 研究 如 何 设置 P 个 学 校 最 好 时 ,就 会 遇 到 求 图 的 P 中 心 
的 问题 。 

至 于 规定 在 P 中 心 设置 学 校 的 实际 意义 和 2. 2 节 中 是 一 样 的 ,这 里 不 再 歼 述 。 


二 、 图 的 P 中 心 的 计算 


如 何 求 图 的 2 中 心 , 最 简单 的 方法 就 是 ， 

L 用 标号 法 求 距离 表 ， 

2. 对 照 距 离 表 将 所 有 顶点 对 Vi.V; 对 应 的 最 大 服务 距离 eCV;,V,) 都 找 出 来 ， 

3. 求 使 eCV,V)) 达 到 最 小 的 顶点 对 。 

对 于 一 个 用 个 顶点 的 图 来 说 ,在 用 标号 法 求 出 距离 表 后 ,还 要 计算 (2 一 1)72 个 
顶点 对 的 最 大 服务 距离 ,而 每 一 次 求 最 大 服务 距离 只 要 进行 约 3N 次 比较 人 小 的 运算 , 因 
此 总 起 来 说 ,上 述 算法 还 是 有 效 的 。 

我 们 还 可 以 用 相似 的 方法 求 图 的 P Pù: 

1. 用 标号 法 求 距离 表 ; 


2. 对 照 距离 表 求 所 在 P 个 项 点 的 最 大 服务 距离 eCVn Vases Vai 

3. K eln YYin)? 达 到 最 小 的 王 个 顶点 。 

求 图 的 P 中 心 的 算法 不 是 一 个 有 效 的 算法 。 因 为 P 顶点 的 最 大 服务 距离 有 GL 一 
ni /(a—P)! XP1), 而 每 次 eVa Vis Vip) 双 进行 约 (P 十 1) *N 次 比较 大 小 的 运 
算 。 因 此 计算 步 数 是 一 个 依赖 于 顶点 数 NN 和 PP 的 指数 函数 .图 的 PP 中 心 的 算法 效率 至 今 
还 是 一 个 基 而 未 决 的 难题 。 


=. 图 的 P 中 心 的 程序 


program p. zhong -xins 
uses crt; 
const maxn = 50; 
type list = array [ 1. . maxn] of real; 


var chart : array[l..maxn]oflist;  《 男 的 邻接 敌阵 } 
biao t ;array[l..maxn]oflist; — ( Je) 
mark 1 arrayL 1. . maxn | of booleani 标号 表 } 
avb-s， {8 一 一 组 合 方案 ,b_s 一 -一 生前 最 好 的 组 合 } 


way»b-way + array[1.. maxn] of integer: 
( way 一 一 辅助 变量 》 
| b_way 一 一 最 佳 方 案 , 即 服务 点 i 选择 Pp 中 心中 最 近 的 服务 点 b-s[b_way[i]] } 
n.p : integer; { nm 一 一 顶点 数 , p 一 一 中 心 数 } 
bst : real; { 目前 最 大 服务 距离 的 最 小 值 } 
procedure init ; 
var ija 3 integer: 
begin; 
clrscr: 
repeat write(/n—'); E 输入 顶点 数 } 
readln Cn); 
until (n220) and (n«Zmaxn) ; 
for 1: —1 to n do 
for j! —1 to n do 
chart(i,j] : 0; 


write(/ number of lines + '); { 输入 边 数 } 
readln (a); 
for k : —1 to a do { 输入 各 条 边 的 长 度 } 
begin 
read (i); 
read (]) ; 
readln (chart [1j ]) : { 各 条 边 的 长 度 } 
chart [j,i] ' —chartli.j]: 
end; 
repeat write(p--'), 
readIn (p); { 输入 中 心 数 P } 
until (p220) and (p<=maxn); 


end; 
procedure make. one .line(x + integer); ( WREKE biao 中 的 x 行 各 元 来 } 


var best ji,j $ integer; 
best : real; 
begin 
foris =1 to n do ( 标号 表 初 始 代 } 
mark[i] :+ —false; 
mark[x] : =true; 
biao[x][x] : =0; 
repeat best: = 0; 
ior i : =1 to n do 
if mark[i] then 
for j! =1 to n do 
if (not mark[j]? and (chart[i.j]770) then 
if (best=0) or (biaolx]G]+chaet[i j ]« best? 


then begin 
best + —biao( x ][ i ] - chart[:.3]: 
best- j : =j; 
end; 
if best>> then 


begin 
biao[ x ][ best -和 : —best; 
mark[bhest..j] + =true; 
end; 
until best = 0; 
end; 
procedure make. biap; { 梅 造 距离 表 } 
vari : integer; 
begin 
for i t! =] to n do 
make. one. line (i? ; 
end; 
procedure check ; 
var ijek : integer; 
trv 5 real, 
begin 
v1—0, BIET EE Tb pd vd } 
fori: =1 to n do 
begin 
t :—biao[ s[1]]fi]; 
k i=l; 
for j 1 =2 to p do 
{ 在 当前 p 个 结 点 中 ,选择 元 vn BERAR vv Ev BAEN } 
{ 为 ttvs 为 p 组 合 的 第 k 个 元 素 )} 
if biao[s[1] lli jt 
then begin 
t 4 biao[s[ 1] [i]s 
k : =j; 
end; 
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d tv 


then v + =t; 


way[i]: =k; | 存储 v 至 组 合 方案 的 p 个 服务 点 中 最 近 的 一 个 服务 点 } 


end; 
if (vy<<bst) or (bat 一 一 1 1vY 为 目前 最 小 的 最 大 妓 务 距离 } 
then begin 
bat 1 =v; 
for i 1 —1 to p do { 存储 各 顶点 最 近 的 服务 点 》 


b.s[i] :=s[0]' 
for i : —1 to n do 
b. sway[i]: —way[il 
end: 
end, 
procedure main: 
var lev : integer, 


begin 
bat + = —1; 
lev 1 11 s[1] 1 =0; {8 中 是 p 个 服务 点 的 组 合 方案 ，; 
while lev>0 do 
begin . 
while s[lev ]n do 
begin 
inc s[lev]D i 
if lev =p 


{ 车 产生 一 个 p 组 合 . 则 求 当前 p 组 人 台 的 最 大 服务 距离 ,并 且 得 出 日 前 } 
{ 扩展 出 来 的 所 有 p 组 人 台中 最 小 的 最 大 服务 距离 方案 } 
then check 
else begin 
inc (lev): 
s[lev] : —s[1ev — 1]; 
end; 
end; 
dec (lev); 
end, 
end; 
procedure show p 
var i ? integer; 


begin 
writeln (you should select + ' 5i 
for ie 一 1 to p do { 打印 p 不 服务 点 } 
writetb. s[i] s 4); 
writeln, 


for i 1 =1 to n do { 打印 各 顶点 去 哪个 上 服务 点 的 信息 } 
writeln ( people in ' ,i,! go to hospital in ',b-s[b-way G] D; 


end ; 
begin 
initi (SS PH 
make. biao : { Hp&IEHUR } 
main: { 计算 图 的 P 中 心 } 
show ; E LEES TIULLIE*AT Du COEUR } 


end. 
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2.4 服务 点 设置 问题 3 一 一 求 图 的 中 央 点 
一 、 服 务 点 设置 向 题 的 第 三 个 标准 


再 考虑 一 个 服务 点 设置 问题 的 例子 。 

我 们 再 把 图 2-3 看 成 一 个 矿区 , 它 有 ?7 个 矿 ,分 别 在 Va V 处 ,这 了 个 矿 每 天 
的 矿产 量 分 别 是 V,.3000t, Vz: 2000t, Vas 7000t, Vi 
1000t,V,5000t,V,.1000t , V; 4000t (À, IE] 2-3). 

现在 要 从 Vis Kast’ V; 中 选 一 个 地 点 来 建 选矿 厂 ， 
问 应 该 选 哪 一 个 地 方 ,才能 舍 各 矿 生 产 的 入 石 往 选 矿 厂 
运 时 花费 的 运输 力量 最 小 ? 

这 个 问题 中 ,判断 一 个 顶点 好 坏 的 标准 不 同 于 求 图 
的 中 心 和 了 中 心 。 对 一 个 顶点 了 ;, 这 里 应 该 计算 的 是 ,如 
RETT REV, 那么 ,将 各 个 矿 生 产 的 矿石 都 运 色 V, 
的 运输 量 是 多 少 ?然后 再 来 比较 在 哪里 设 选 矿 厂 最 好 .一 
f. 我 们 以 运输 的 t。km 数 来 计算 运输 量 的 大 小 。 一 吨 货物 运输 一 公里 就 叫 it。 km. 如 
REPT REV Mat oH.: 

g(V,) — 3000 04-2000 X 34-7000 X 54-1000 X 6. 3-- 5000 X 9. 3+ 1000X 4. 5 十 4000 
X 6—122300(t * km) 

g(V.) —3000 X 34-2000 X 02-7000 X 2-1-1000 X 3. 32-5000 X 6. 3-- 1000 X 1. 5 十 3000 
X3-68300(t * km) 

一 比较 ,就 可 以 看 出 选矿 广 设 在 V. 要 比 设 在 了 , 4p. HER Vo 是 不 是 最 好 的 还 不 能 确 
定 , 应 该 把 gCVD ,gOVs),… ,glVYy) 都 算出 来 再 比较 一 下 , 才 可 以 选 出 一 个 最 好 的 设 厂 点 
来 。 

表 2-5 AET gD i=l. 2,7 ARPA V 最 好 。 


GC) (kt * km) 


上 面 我 们 虽然 只 通过 一 个 例子 来 讲 , 不 过 一 般 的 情况 也 是 这 样 的 。 一 般 说 来 , 设 有 一 
个 连通 图 G= [V ENG 的 每 一 条 边 。; 有 非 负 的 长 度 C(e),G 的 每 一 个 顶点 V; 还 有 一 个 
“产量 ”4(VY)。 对 于 每 一 个 顶点 Vi 今 : 

g VO — AC X DO .,VO--AQ'UXDGSVOM mH -AQ(LXDPO,VO 

g VORBEI RA PM BGAE V: 所 花费 的 +。 em 数 ,对 于 一 个 具有 N 个 顶点 的 图 
G 来 说 ,使 &(V)) 最 小 的 顶点 为 该 图 的 中 央 点 。 在 以 运输 量 的 大 小 为 标准 时 ,中 央 点 就 是 
设置 服务 点 的 最 好 位 置 了 。 


—. 图 的 中 央 点 的 计算 


求 图 的 中 央 点 的 方法 是 : 

1. 用 标号 法 求 距离 表 ， 

2 对照 距离 表 求 g(V 0 g (VD ng (V2) 

3. 求 使 gy7) 最 小 的 顶点 VLC Sa). 

让 上 述 算法 可 以 看 出 , 求 中 央 点 的 计算 方法 也 是 有 效 的 。 


=, 求 中 央 点 程序 
program find zhong. yang point ; 

uses crt, 

const maxn — 100: 

type list =  array[ 1. . maxn ] of real; í ) 

var chart ° array ]. . maxn ] of list, { : 
mark | * array 1..maxn]of boolean; | MIEETPSSG 
b t liat , i ' 
mn 3 integer; i . 
aa + list; . : HTAR . 


procedure init; 
vari,ja,k s integer) 
begin: 
elrscr, 
repeat wrire(^n—'); { Le rt 
readin(n) ; 
untíl (n2-0) and (n«maxn?; 
for j 1! =1 to n do { rd up. 
for jt=1 to n do 
chart[i,j] : —0; 
write number of lines + 2s (L4 AE! 
readln la}; 
writeln (input graph + '; 
for k : —1 to a do { 输入 无 向 图 的 邻接 矩阵 } 
begin 
read (1) ; 
read C 
readIn(chart[i,j]5; 
chart[,i]] : chart[i,j]: 
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end; 
vriteln input a + 0i { 输入 日 矿产 最 aafl.. n] | 
for i t =} to n do 
readin aaki D 
end, 
function find. fareat(x : integer) ? real; 


{ 求 各 顶点 物资 运 到 x 所 花费 的 +* km 数 } 


vat best_i,i,j 1 integer; i 最 佳 路 径 的 端点 序号 ,辅助 变量 } 
best ,farest : real; { 最 佳 路 径 代 价 ,gtx) 值 } 
begin 


fori! —1 to n do 
mark[i] * —false; 
mark[x] : 一 trues 
blz]: 0; 
farest + 一 0 
repeat best 1 一 04 
for i t =1 to n de 
if mark[i) then ( Zr Vx 5 V, IGI A IP RECORIB ) 
for j : =1 to n do 
if (not mark[j]) and (chart(i.j17» 0) then 
if (best=0) or Cb[1]-- chart[1.j i best) 
then begin 
best 上 —bii]-rehart[i:j]: 
best)? =j; 
end; 
if best >0 then{ 车 best. j 顶点 与 x TR SR EHE PCR HI } 
begin 


b[best.j]*--best, | BTZ BI PXEB BERI best ; 顶点 标号 } 


mark[best .j] + 一 truey 
fareat 3 —farest-- best * aa[best i]: ( Rit go ] 
end ; 
until best 0; 
fid. farest + —farest; 
end; 
procedure main; 


var best. i.i : integer: 《g 值 最 小 的 项 点 序号 ,辅助 变量 5 


erbest : pes, Bi 1-60: F2 CEE USO SN 
begin 
best t —04 
fori: 二 1 to n do (OK g 什 最 水 的 项 点 best i) 
begin 


e 1 =find-farest li); { 求 g[vj]} 
if (exbest) or (best—0) 


then begin 
best 1 一 人 1 
best i ! 一 全 
end; 
end 3 


writeln (center point ? ^,best i», | 打印 图 的 中 央 点 } 


ss ol" 
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end; 
begin 
init; ( 输入 图 》 
main, ( 计算 并 输出 图 的 中 央 点 } 


end. 


第 三 章 ” 求 最 小 生成 树 
3.1 求 无 向 图 的 最 小 生成 树 


这 一 章 讲 的 最 小 生成 树 阿 题 ,是 图 论 中 又 一 个 很 重要 的 问题 ,其 重要 性 不 亚 于 最 短路 
问题 。 先 讲 一 讲 什么 叫 生成 树 。 


一 、 最 小 生成 树 的 由 来 


设 G=[V ,Ej 是 一 个 无 向 图 ,如 果 了 二 [V E; HB] G 的 全 部 顶点 及 一 部 分 边 组 成 的 
子 图 并 且 了 是 树 ( 连 通 , 没 有 大 的 图 ), 则 称 了 是 的 一 个 生成 树 。 

一 个 连通 图 G 一 般 有 许多 种 生成 树 。 现 在 考 虚 一 个 连通 图 G=[V ,Ej, 它 的 每 一 条 
ij E, TEE LES. AHF G 的 任意 一 个 生成 树 工 ,我 们 把 周 于 了 的 各 条 边 的 
长 度 加 起 来 的 和 称 为 了 的 长 度 , 记 作 世 (7)。 例如 对 图 3-1 中 的 图 G 来 说 ,人 8),《e) 中 的 币 
个 生成 树 T, 5; T. 的 长 度 就 分 别 为 工人 TD 一 22717T2 一 17。 


Vi 4Q Vs Va Vi 4 Vs s V3 Vi g Vs aV: 
Y, 8 Vs Vi 8 Vs Fi Vs 
aG WTI G6) Te 
图 3-1 


RETARA: T0] JA. GAERA REKER ERR. AN 

题 即 所 谓 最 小 生成 树 问 题 。 
最 小 生成 树 问 题 有 很 广泛 的 应 用 。 例 如 ,我 们 把 图 31 中 图 GG 中 的 五 个 顶点 看 成 某 乡 

的 5 个 村 :G 的 边 看 成 是 公路 ,现在 要 沿 公路 架设 电线 ,使 各 村 之 条 都 通电 话 , 问 应 该 怎样 
架 线 , 才 能 使 所 用 的 电线 最 少 ? 

考虑 一 下 就 可 以 看 出 .这 个 问题 的 关键 是 决定 图 上 的 哪些 边 上 该 架 线 , 哪 些 边 上 不 架 
线 。 设 架 线 的 边 的 集合 是 已, ,那么 Gt 一 [Y ,5 REG 的 一 个 子 图 。 因 为 架 线 后 各 个 乡间 
都 能 通话 ,所 以 Cl 必须 是 连通 的 。 因 此 要 使 电线 最 节约 ,就 是 要 从 与 的 所 有 连通 的 子 图 
中 ,把 总 达 长 最 小 的 找 出 来 .但 是 不 难看 出 ,总 边 长 最 小 的 连通 子 图 一 定 不 会 含 图 ,从 而 必 
TER ERE. 因此 架设 电线 的 问题 ,就 可 以 归结 为 最 小 生成 树 问题 .类似 的 向 题 还 有 
很 多 ,例如 修 公路 把 一 些 城镇 连接 起 来 , 修 渠道 使 水 渠 和 各 块 地 连接 起 来 ……*, 都 可 以 归 
结 为 最 小 生成 衬 问 题 。 另 外 ,有 不 少 图 论 问 题 在 计算 时 ,往往 首先 必须 求 出 一 个 最 小 生成 
树 问题 ,这 也 是 最 小 生成 树 问题 显得 特别 重要 的 一 个 原因 。 
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=. 最 小 生成 树 的 计算 


一 开始 , 先 将 G 图 中 的 边 都 去 掉 , 只 留 下 孤立 的 顶点 ,这 个 图 即 为 G 图 最 初 的 生成 子 


图 G,。 然 后 逐步 地 将 当前 最 小 边 e; 加 上 去 ,每 次 加 的 时 候 , 要 保持 住 “ 没 有 图 ”这 一 性 质 ， 
在 加 了 NN 一 1 RAN 是 顶点 个 数 ) 后 ,Gi 便 成 为 所 要 求 的 最 小 生成 树 了 。 其 计算 步 又 如 


F: 


— %4 


从 原 图 G 中 选择 权 最 小 的 边 ey/ 加 入 生成 子 图 GG， 
* 

XGEGH RT XA He MEG. 
| (D ERRAMU Pe ;的 权 最 小 ; 
| OD) e MIBAGIE TIE UN ; 

N ! 
"— à E 
i Y 
人 G 为 最 小 生成 衬 
最 小 生成 树 的 程序 
program kruskal_p33+ 
const 
maxn = 380; 
type 
ghtype = array [1. . maxn,1. . maxn] of integer; 
settype = set of l.. maxn; 
var 
n : integer; ( 观 虚数} 
gh t ghtype; { 邻接 矩阵 ) 
f + text; { 文件 变量 } 
procedure read. graph| 
var 
str 1 string; 
"E integer; 
begin 
write('Graph tile = '0, ( 将 读 入 的 外 部 文件 名 与 文件 变量 连接 起 来 } 
readln (str }; 


assign (f.str); 
reset(f)} { 该 准备 } 
readintf.n), + 读 入 顶 结 点 数 } 
fori: —1 to n do 
for j+ —1 to n do read(f ,gh[i,jj); i 读 入 邻接 答 阵 } 
closet) ( 关闭 文件 } 


end; 


procedure select(var a,b : integer rs ! settype?; 
var 


isjet + integer; 
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begin 
t: —maxint; 
fori: =1 to n do 
AASR MERR T 中 的 项 点 集合 ,在 所 有 待 扩展 项 点 中 选择 权 最 小 的 } 
(Gs pGE T;4& TOR } 
ifiins 
then for j * —1 to n do 
if (i ji) and not G in s) and (gh[i.j]-—0 
then begin 
a: =i;b : =j;t : =gh[i,i] 
end 
end; 


procedure kruskal, 
var 
isjek,t + integer; 
a ! settypei 
begin 
t: =0; t —[1]; {从 结 点 1 开始 扩展 } 
fori: =1 to n—1 do ( 水 一 扩展 n 一 1 条 边 } 
begin 
select(j,k,s2; ( 选 边 扩 展 》 
t) 二 t 十 gh[j,k]; { REAM? 
writeln (j,! ——' sk); { 打印 该 边 } 


ai 一 s 十 [k]+ { 扩展 后 的 顶点 进入 开 树 } 
end; 
writeln( Tot = ',t) 
end, 
begin 


read graph, ( 输入 图 } 
kruskal i HAA EARDER } 


end. 


3.2 求 有 向 图 的 最 小 树 形 图 
一 、 什 么 叫 最 小 树 形 图 


3. 1 节 讲 最 小 生成 树 时 , 曾 说 过 ,最 小 生成 树 问题 也 可 以 用 来 解决 渠道 设计 问题 。 但 
这 种 说 法 仅 适 用 于 水 源 以 及 需要 灌流 的 各 块 地 芍 地 势 一 桩 高 的 情况 ,如 果 水 源 和 各 块 地 
的 地 势 有 高 低 , 问 题 就 比较 复杂 了 。 

例如 图 3-2 GO ESPERE PI D F V, 表示 处 于 最 高 地 势 的 水 源 ,其 它 顶 点 表示 知 要 灌溉 
的 地 ,各 条 绝代 表 可 以 选 来 修建 渠道 的 线路 , 弧 的 方向 指出 地 势 的 高 低 。 例 如 Y* 到 Vs* 有 
弧 表 示 水 可 以 从 高 地 势 的 V, 流 到 低地 势 的 VY;。 现在 需 韶 解决 的 问题 是 :应 该 选择 哪 几 条 
路 线 修建 渠道 才 最 节省 ? 

如 果 不 考虑 弧 的 方向 ,用 3.1 节 的 办 法 求 最 小 生成 树 , 那 么 求 得 的 将 是 (5), 它 的 弧 总 
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[dq 3-2 


长 是 :2, 但 是 按 这 个 图 修 沼 道 是 行 不 通 的 , 医 为 V 的 水 流 不 到 V3 和 Y:。 和 要 使 各 块 地 都 
能 得 到 灌 浸 而 且 总 长 度 又 最 小 的 设计 方案 记 该 是 Cc} 中 男 的 那样 ,虽然 它 的 弧 总 长 是 17， 
但 是 它 是 V, 的 水 能 够 流 到 各 块 邮 的 最 小 值 。 

分 析 一 下 图 3-2(6) 和 (ce) 有 什么 特点 ,显然 它们 的 公共 特点 是 ,如 果 不 考 虚 弧 的 方向 ， 
它们 都 是 树 , 即 它们 的 相伴 无 向 图 是 树 。 但 是 作为 一 个 渠道 设计 的 方案 来 说 ,单单 具有 这 
个 性 质 还 不 够 , 它 至 少 还 需要 一 个 性 质 , 就 是 :水 源 的 水 能 流 到 各 块 地 上 去 。 

从 王 述 分 析 中 ,我 们 抽象 出 树 形 图 的 定义 。 

设 厂 = (7Y,4) 是 一 个 有 向 图 ,如 果 它 具有 下 述 狂 质 : 

1. DA AVEC HA: 

2. fF — T DU V. EPEMA ER vili V. 的 其 它 顶 点 都 恰好 是 唯一 的 一 条 弧 
的 终点 。 

HI D ÆU V, 为 很 的 树 形 图 。 

显然 ec) 中 的 图 代表 的 渠道 设计 方案 所 以 是 可 行 的 ,原因 就 在 于 它 是 一 个 树 形 图 。 Mi 
C5) 所 以 不 可 行 也 就 是 因为 它 不 是 树 形 图 。 

由 树 形 图 的 定义 ,不 难 引出 最 小 树 形 轿 的 概念 ， 

设 给 定 了 有 向 图 户 = (V ,4), 它 的 每 条 强 都 有 一 个 非 锡 的 长 度 , 现 在 要 从 也 的 所 有 
以 V,( 相 当 水 源 ) 为 根 的 树 形 图 中 , 找 出 弧 的 总 长 许 最 小 的 树 形 图 来 。 

显然 选择 最 节约 的 渠道 设计 方案 问题 可 以 归结 为 求 最 小 树 形 图 问题 。 


二 、 最 小 树 形 图 的 求法 


求 最 小 树 形 图 要 比 求 最 小 生成 树 麻烦 一 些 ,不 过 只 要 稍为 耐心 些 学 习 , 还 是 能 学 仅 
的 。 为 确定 起 见 , 下 面 都 假设 指定 为 根 的 顶点 是 Ti。 

2598 1， 求 最 短 弧 集合 A 

KAE V: 为 终点 的 弧 中 取 一 条 最 短 的 ,再 从 以 PL STE GE EE I Eoi 
车 在 选取 以 让， FT, 为 终点 的 最 每 弧 的 过 程 中 发 现 一 个 顶点 Fi 天 六) 不 是 
恒 九 中 任何 弧 的 余 点 ,这 时 计算 结束 ,因为 显然 九 中 不 存在 以 V, 为 根 的 最 小 树 形 图 。 若 
得 到 以 Va VaV, 为 终点 的 NN 一 1 条 最 短 弧 ,把 这 些 弧 组 成 的 集合 叫做 ASCV ,44) 是 图 
D 的 一 个 生成 子 图 ,4. 是 所 有 具备 了 树 形 图 性 质 2 的 生成 子 图 中 弧 疙 长 度 最 短 的 一 个 。 
但 是 A, dE EB T BESTEN 1, 一 定 为 五 的 最 小 树 形 图 呢 ? 

例如 对 于 图 3-3ta) 中 的 有 向 图 D 来 说 ,用 上 述 办 法 得 到 的 生成 子 图 A 就 是 (5) 中 的 
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E CARATE C 和 Cs, 因此 A PE D TREE, 

Em 2. 检查 Ao 

E A。 没 有 有 向 轿 且 不 售 收 缩 点 , 则 计算 结束 ,A BE DAA Vs 为 根 的 最 小 树 形 图 
HUE Ao 没有 有 向 圈 、. 但 含 收缩 点 , 则 转 步 骤 LË Ao 含有 有 向 图 C,.C, tn C, APR 
3, 

步骤 3. 收缩 DOLE 3. 3Ca)) 中 的 有 向 圈 

$ D PH CC, C. 分 别 收缩 成 项 点 UU: SU. D 中 两 个 端点 都 属于 同一 个 
AMEC 的 弧 都 被 收缩 掉 了 REDRE, 得 到 一 个 新 的 图 Ds. D. 中 以 收缩 点 为 终点 
的 弧 A, 的 长 唐 要 变化 ,变化 的 规律 是 : 设 AL 的 终点 是 收缩 点 U ,并 且 有 向 圈 C 中 ,与 A 
有 相同 终点 的 弧 4,, 则 

A, Æ D, 中 的 长 度 一 LCA) 一 LUA,) 

KE LADI LCAO TERREA A 5 A ED FAHRE. 

按 上 述 收 缩 的 规律 ,图 3-3 + D 应 该 变 成 图 3-4 PAID. 

a D FRETI BR C, 和 Cs 见 图 3-3(5) 分 别 收 缩 成 D, 中 的 顶点 局 AUU, AU: 今 
后 称 为 收缩 点 。 

那么 .Du 中 有 向 图 C a.C, C, 被 收缩 后 得 到 的 Ds ,与 原来 的 D 有 什么 关系 呢 ? 

1. WR D, RAL V, 为 根 的 树 形 图 ,那么 D. BRAA ,为 根 的 树 形 图 ; 

2. WR HJ Di 的 以 了: 为 根 的 树 形 图 ,那么 可 以 通过 某 种 “展开 ”的 方法 (由 步骤 4 
给 出 ?得 到 D, 的 以 V, 为 根 的 树 形 图 He. 

因此 ,必须 返回 步骤 1, 求 Pi 的 以 7: 为 根 的 树 形 图 。 

步骤 4， 展开 收缩 点 

对 图 3-4 求 最 德 弧 集合 A 的 结果 如 图 3-5(a) 所 示 。 

EFA RARE B A WED 的 以 六 为 根 的 最 小 树 形 图 H. EH, 会 收缩 
点 Ul 和 UUs。 如 何 将 它们 “展开 ”, 求 得 Do 的 以 V. 为 根 的 最 小 酝 形 图 呢 ? 展开 办 法 : 

BUB D, 中 属于 H, HE D, 中 都 仍 属于 五,; 将 每 一 个 收编 点 U; 展开 成 有 向 时 C. 
C, 中 除去 一 条 与 Hs 中 的 弧 有 相同 终点 的 弧 外 ,其 它 的 弛 c 都 属于 He 

fite EXERROTZHIE Ho 首先 应 该 包含 H, PHM a3;a1i,ar1。 另 外 ;应 该 把 Ui U: E 
FRC 和 C, ,并 去 掉 C 中 与 H, 中 的 2a3 有 公共 终点 的 a, 和 去 掉 C, 中 与 Hi 中 的 a, 有 
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公共 终点 的 as, 得 到 H OLE 3-500 PEEL HERI JE ERE SEULS ETEF HO. 

E D, 的 最 小 树 形 图 Hv 的 算法 可 以 简 述 成 ; 

对 D, 3E ECL Gr ALLEE A 不 存在 , 则 D 没有 树 形 图 。 F A 存在 且 不 含有 向 圈 ， 
出 A; MA D, 的 最 小 柚 形 图 H È A 含有 向 图, 那么 收缩 A 中 的 有 向 图 得 到 图 Ds 

对 于 D; 来 说 ,如 果 求 得 的 A 还 包含 有 向 圈 , 那 么 还 要 收编 ,得 到 D, FEF 1,2， 
3 用 到 D, 上 去 , 求 出 A……。 这 样 做 下 去 ,一 直 得 到 一 个 D,, 它 没有 树 形 图 (这 时 可 以 肯 
Æ D, DD, 也 都 没有 树 形 图 ) ,或 它 对 应 的 A TASANE BI A, 是 D. 的 最 小 树 
形 图 H.. 这 时 ,通过 步骤 4 的 展开 求 出 D1 的 最 小 树 形 图 H. ,1 再 展开 直至 得 到 Do 的 最 
小 树 形 图 H.E. 


Z., 求 最 小 树 形 图 的 程序 


program shu. xing- tu: 


uses 
crty 
const 
maxn = 50; 
type 
graphtype = grray[1. . maxn, 1. , maxn ] of integer: 
Itype = array[ 1. . maxn] of integer: 
settype = set of 1.. maxn; 
setstype = atray[ 1. . mexn | of settype: 
var 
g ' graphtypes { 图 的 邻接 矩阵 } 
ec ! getstype; { 圈 内 的 顶点 序号 } 
n : integer; { 顶点 数 } 
Lf 4 Hype; ( ft- 一 Do 图 的 最 小 树 形 图 HO 
{1 一 一 D; 顶点 在 D 中 的 序号 } 
t t text; { 文件 变量 } 


procedure init, 
var i,j + integer; 


gtr ! sring; 
begin 
elrser, 
writel file name =°); ，{ 读 入 文件 名 ,并 与 文件 变量 连接 } 
readin (str); 
assign(f ,str) 
reset (f); { 读 准 备 } 
readin(£n); {RAMAK 1 
fillchar(g sizeof (g) 0); | 邻接 矩阵 初始 化 } 
while not eof(f) do { 读 入 各 边 的 权 } 
readinct ,i,j,g[i,j]); 
closet, { 关闭 文件 } 
endi 


procedure main; 
vat i,pkKotexsysvou ! integer; 


itl + itype; ( D, 对 应 的 梯形 图 H? 

more ! boolean; 《 cir 

ss * Settypei { H, 中 的 图 集合 } 
begin 


fori' =1 to n do l[i]: =i; (D; 各 顶点 在 D, 中 的 序号 初始 化 } 
fillchar (ft sizeof (£t) ,0) ,( Hs 初始 化 } 
repeat more : =false; 
fillchar (ftl „sizeof (ft1) 0); ( H, 初始 化 } 
for is =1 to n do ceel]: =i] 
{ 各 顶点 所 在 圈 内 的 顶点 集合 初始 化 } 
forv: =2ton do 
if I[v]— v then { V 顶点 目前 未 收缩 } 
begin 
k : =maxint; 
for u t =2 to n do if I(u]—v then (Er u 顶点 被 收缩 成 v} 
for j : =1 to n do 
( 在 以 4 为 终点 的 狐 集 中 , 取 最 短 强 的 起 点 t+ 
i£ O11 79) and (glu 1 0» and Cg[j uk) 
then begin k : —g[j;u]; t? =j: i? =u; end, 
if k— maxint then ( 若 最 短 弧 不 存在 ,打印 无 解 } 
begin writeln (no answer' ); halt; end; 
HGJ: =t; ftiv]: 2t] 
{1 顶点 进入 Ho, 对 应 的 LLtj] 进 入 Hi) 
if [t] in ee[v] then 
(2r LLCHEUA v 顶点 为 收缩 点 所 在 的 图 内 } 
begin 
more ! 一 ttue1 
k: =li] { 图 内 顶点 的 Di 序号 设 为 v } 
repeat l[k] + =v; 
k : =ft1[k]; 
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until Ik ]—v; 
for x : =1 to n do ( 修正 弧 长 } 
if lix 1v then 
for y : =1 to n do 
if Q[y 1— v) and (gLxsyj>0) then 
gboyl: 7gbeoyl—gli(y].y] 
end; í then } 
sa :一 []4 
k: "ma 
repeat ec[ft1[k]] : —ec[fti Uk ] ]--eci v]; 
CUOSEBULA ED CARERE I 
55 上 =ss+[k]; 
k: =ft1[k]; 
until (ft1[k]—0) or Ck in ss); 
end; { then } 
until not more; | 直至 不 全 有 向 圈 为 让 } 
for i: =2 to n do writeln (ft{1i],' tas { 打印 HG 
end; 


begin 
init; { 输入 有 向 图 } 
main; ( 计算 和 输出 最 小 树 形 图 } 


end, 
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第 四 章 ”图 的 连通 性 
4.1 连通 性 的 基本 概念 和 定义 


图 的 连通 性 这 个 概念 十 分 重 覃 , 它 的 直观 意义 就 是 “ 连 成 一 片 ”。 当 然 ,如 果 把 连通 图 
定义 为 ^ 连 成 一 片 的 图 ”就 不 太 好 , 钴 为 如 果 表 追问 一 句 :“ 什 么 叫 连 成 一 片 ?” 怨 怕 就 不 好 
回答 了 。 因 此 必须 给 图 的 连通 性 下 一 个 准确 的 定义 : 

在 无 向 图 G 中 ,如 果 从 项 点 Y 到 项 点 V' 有 路 径 , 则 称 V A V RER. 如 果 对 于 图 
中 任意 两 个 顶点 Vi,V;EV,V, 和 和 V; 都 是 连通 的 , 则 称 是 连通 图 。 


Pol 
AES 
6 G G; G, 


E 4-1 


图 4-1 中 的 GGG 是 连通 图 ,而 C. 则 是 非 连 通 图 ,但 C. 有 3 个 连通 分 量 , 如 图 4- 
2 所 示 。 所 谓 连 通 分 量 指 的 是 无 向 图 中 的 极 大 连通 子 图 。 


G3 


AA 


(2) Gi Ga 
C 的 两 个 强 连通 
HEG, MG 


a) (3) (a) à) 


4-2 Kj 4-3 


在 有 向 图 C 中 ,如 果 对 于 每 一 对 ViyVjEV VAV JA V; SUV, 和 从 人 到 大都 存在 
路 径 , 则 称 G 是 强 连通 图 。 有 向 图 中 的 极 大 强 连 通 子 图 称 作 有 向 图 的 强 连通 分 量 。 

例如 图 4-3(a) 中 的 G, 不 是 强 连 通 图 ,但 它 有 两 个 强 连 通 分 量 , 如 图 4-300 BD. 

一 个 连通 图 的 生成 树 是 一 个 极 小 连通 子 图 , 它 含 图 的 全 部 顶点 ,但 只 有 足以 构成 一 
棵 树 的 "一 1 条 边 ,图 4-4 是 图 4-2 所 示 G 中 最 大 的 连通 分 量 的 一 棵 树 。 LR XE RUE 
树 上 添加 一 条 边 必 构成 一 环 ,因为 这 条 边 使 得 它 依附 的 那 两 个 顶点 之 间 有 了 第 2 条 路 径 。 
一 裸 有 个 顶点 的 生成 树 有 且 仅 有 x 一 1 条 边 。 如 果 一 个 图 有 二 个 顶点 而 小 于 ”一 1 条 边 ， 
则 是 非 连通 图 ,如 果 它 多 于 n 一 1 条 边 , 则 一 定 有 环 。 但 是 ,有 x 一 1 条 边 的 图 不 一 定 是 生成 
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B. 

对 于 任意 连通 图 来 说 ,是 否 连通 的 程度 都 一 样 ? 不 图 4 285 Gi 的 和 
是 。 例 如 图 4-1 中 的 GGC 都 是 连通 图 ,但 是 连通 的 READER 
程度 大 不 一 样 。G 删除 一 边 后 仍 连通 ,但 它 有 一 个 顶点 
V, Bl V. 和 与 其 关联 的 各 边 后 ,G; 就 不 连通 了 ;Gs 只 "P" 
删除 一 条 边 或 一 个 顶点 后 仍 过 通 ,而 G, 是 一 个 具有 5 个 
顶点 的 完全 图 ,删除 任意 3 个 顶点 或 3 条 边 都 不 能 使 其 破碎 。 为 精确 刻画 连通 的 程度 ,我 
们 引入 两 个 量 , 边 连通 度 和 顶 连 通 度 。 


一 、 MEME KO» 


V' 是 连通 图 G 的 一 个 顶点 子 集 。 在 G 中 删 去 V' 及 与 V' 相 关联 的 边 后 图 不 连通 , 则 称 
Y' 是 G 的 割 顶 集 。 最 小 割 顶 集 中 顶点 的 个 数 ; 记 成 KK(G), 叫 做 G 的 连通 度 。 规定 天 (完全 
图 ) 一 顶点 数 一 1; 玉 (不 连通 图 )= 玉 (平凡 图 ?一 0。 开 (G) 一 1 时 ， 制 顶 集中 的 那个 顶点 叫做 
AM. Mex DES PERI ER LG. 中 成 块 的 极 大 子 图 叫做 G 的 块 。 

例如 图 4-1 中 ,天 (G -1,K(G)0—3,K(G025—1—416, 5 G ER: G 中 有 两 个 
三 角形 块 。 


二 、 边 连通 度 K G) 


已 是 连通 图 G 的 一 个 边 子 集 。 在 G 中 删 去 E' 中 的 边 后 图 不 连通 , 则 称 E E G 的 桥 
集 。 若 G 中 已 无 桥 集 E", EE <E WR LE | 23 G 的 边 连通 度 , 记 成 K'(G)。 |E | 
二 1 时 , 妨 中 的 边 叫做 桥 。 规 定 K'( 不 连通 图 ) 二 0,K'( 完 全 图 ) = 顶点 数 一 1。 

例如 图 4-1 rH, K' (G0 —2, K' (G0 8, K' (G) —55—1—4. Gu G6, 中 无 桥 。 

对 于 任意 一 个 连通 图 C, 在 计算 出 上 述 两 个 量 后 ,我们 可 以 给 该 图 下 一 个 定义 ， 

K(GYZM,G 叫做 M XS E] K' (G)2 M 时 ,G 称 为 M 边 连通 图 。 

例如 图 4-1 中 ,G; 是 1 连通 图 ,2 边 连 通 图 ,当然 也 是 1 DEGREE LC. 是 3 连通 图 , 当 
然 也 是 1,2 连通 图 ,C, 是 3 边 连 通 图 ,当然 也 是 1,2 边 连 通 图 ;G, 是 4 连通 图 ,当然 也 是 
1,2,3 连通 图 ,G, 是 4 边 连 通 图 ,当然 也是 1,2,3 边 连 通 图 。 

M 连通 图 , 当 MT 时 ,也 是 M 一 1 连通 图 。 

M 边 连 通 图 , 当 M> 时 ,也 是 M—1 边 连通 图 。 
下 面 给 出 连通 图 G 的 两 个 特征 ， 

L KIOSK (OSG HKA RNK RMA & 

2. 顶点 数 大 于 2 的 2 连通 图 的 充分 必要 条 件 是 任 两 个 顶点 在 一 个 图 上 。 

由 于 连通 度 和 边 连通 图 的 计算 涉及 网 络 流 知识 ,因此 我 们 将 在 第 六 章 作 专门 介绍 .这 
一 章 里 我 们 给 出 求 割 顶 , 块 以 及 极 大 强 连通 子 图 的 算法 ,并 给 出 两 个 实际 应 用 .在 此 之 前 ， 
我 们 先 介 绍 一 个 关键 算法 一 一 深度 优先 搜索 (dfs), 它 在 解 图 的 连通 性 和 问题 中 扮演 了 极其 
重要 的 角色 ,而 且 其 思想 方法 还 渗透 到 其 它 许多 图 论 算法 的 设计 中 。 
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4.2 深度 优先 搜索 (dfs) 


一 、 什么 是 深度 优先 搜索 


为 了 理解 深度 优先 搜索 的 思路 ,让 我 们 追溯 到 1690 年 修筑 的 威廉 王 迷 富 ， 它 至 今 保 
存 完好 ( 见 图 4-5(a))。 


(a) (b) 


迷 官 法 则 :任务 是 从 迷 官 入 口 处 出 发 ,每 个 走廊 都 要 搜索 ,最 后 再 从 入 口 出 来 。 为 了 
不 多 圈子 ,需要 记 住 哪些 走廊 已 经 走 过 , 沾 着 未 走 过 的 通道 尽 可 能 远 地 走 下 去 , 走 到 死 胡 
同 或 那里 已 无 未 走 过 的 走廊 可 选 时 , 沿 原 路 返回 ,到达 一 个 路 口 ,发 现 可 通 往 一 条 未 走 过 
的 走廊 可 选 时 , 沿 这 一 未 走 过 的 走 麻 尽 可 能 远 她 走 下 去 …'…， 最 后 即 可 搜索 遍 全 部 走廊 和 
厅 室 ,再 由 入 口 处 出 迷宫 。 

我 们 把 图 4-5(Ca) 中 字母 表示 的 厅 室 看 作 是 顶点。 如 果 两 个 厅 室 之 间 通 有 走廊 , 则 在 
代表 它们 的 两 个 顶点 之 间 连 一 条 边 ,两 个 厅 室 之 间 没 有 道道 就 不 连 。 这 样 形成 了 一 个 图 
(图 4-500, 

迷宫 法 则 粗略 地 描述 出 深度 优先 搜索 的 算法 轮廓 。 现 在 我 们 针对 抽象 出 的 无 向 图 再 
作 一 番 讨 论 。 为 了 篇 略 起 见 , 先 看 连通 了 图。 对 于 非 连 通 图 , 则 只 要 在 每 个 连通 分 量 中 用 一 
iK dfs 算法 便 可 滔 历 图 的 每 个 顶点 。 

先 任 取 一 个 顶点 作为 根 , 记 为 Z, 现 认为 习 顶 点 已 访问 过 (在 迷 官 问题 中 ,取信 口 瑟 
FAE). FEU BHARRA. Aw 顶点 ,形成 关联 边 (D 多), 且 对 这 条 边 定 方向 为 
U a WwW., EAU, WIA CREA”, HRA WEAR ARU 称 为 全 的 父亲 点 , 记 为 UU 
—father(W), 

一 般 情 况 下 当 访 问 某 项 点 区 时 ,有 两 种 可 能 ， 

1. 如果 区 顶 点 的 所 有 关联 边 被 检查 过 了 , 则 回溯 至 XX 前 父亲 顶点 ,从 fathec GO Bf 
继续 搜索 ,此 时 号 顶点 已 无 未 用 过 的 关联 边 ， 

2. 如 存在 基 巴 点 未 用 过 的 关联 边 , 则 任 选 其 中 一 边 (X,Y) ,对 其 定向 为 从 和 到 了 ， 
此 时 说 边 ( 和 ,7) 正 等 待 检查 ， 

检查 结果 有 两 种 情况 1 

1. dm Y 顶点 从 未 被 访问 过 , 则 有 顺 着 (和 ,了 )? 边 访问 了 ,下 一 步 从 了 开始 继续 搜索 。 此 时 
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(OU YO BI HL. ETE X — father Yo Bl E Fl 3c eo Us 
2. tq Y 顶点 已 被 访问 过 , 则 再 选 ak. RO 


此 时 (和 ,7 了) 是 后 向 边 , 用 虚线 表 出 。 4g AS, " 

此 时 ,(X,Y) 的 归属 已 明确 ,(X,Y) 就 检查 完毕 。 在 dis 搜 fece 
索 期 间 ,根据 顶点 X 被 首次 访问 的 次 序 安排 了 不 同 的 整数 dfn N^ 
GOD. dil dfn GO =i RE X 58 i AARE TELE din) A. s 
称 为 基 的 深度 优先 搜索 序数 , 当 搜索 返回 要 时 ,连通 图 的 所 有 O 
TARARE. MER HKA E T ITIN AAR ÉA: Eo 
线 ) 组 成 的 有 向 树 以 及 后 向 边 (虚线 ) ,这 个 有 向 生成 树 称 为 dfs YO 
树 。 图 o6 

图 4-6 给 出 图 4-5(6) 的 dfs 搜索 过 程 。 每 个 顶点 旁 〇 内 的 
数字 为 dfn 值 。 

显然 dfs 算法 类 似 袖 的 前 序 遵 历 。 
=. 无 向 图 G 的 dfs 算法 分 析 

标志 一 切 边 未 用 过; 


AEG 8E— TR RU, Bidfn QU -U, 
ie 0,U 1838 HRS: 


ieit 1H4díncU)-—i;; 


Ux fu XEdir YY | 
N 
V Ex RES USER e LV, pm 
N 
axe" 用 过 2 Us-fatherCt) , 
L 


UV; 


为 了 便于 在 以 后 各 章节 中 深入 开发 上 述 算法 ,再 引进 一 些 术 语 。 现 在 G 从 无 向 图 改 
造成 有 向 图 , 且 每 项 点 有 din 值 , 前 向 边 组 成 dfs 树 ,人 若非 连 通 图 ,出 对 每 一 个 连通 分 量 
进行 一 次 dfs 搜索 ,结果 产生 一 个 由 若干 dfs 树 组 成 的 森林 ), MEA U AW 有 树 边 组 成 
HARR WIU MW 有 直系 关系 ,U 称 为 W 的 祖先 点 ,W AU WERA. I QU WD 
是 树 中 一 条 边 ,U 又 确切 地 称 为 克 的 父亲 点 ,W 也 可 称 为 的 儿子 点 。 一 个 顶点 可 有 多 
TILER DR U 和 它 的 所 有 后 代 点 组 成 关于 树 中 以 VU 为 根 的 子 树 ， 

WRU IW 不 存在 直系 上 下 关系 , 则 说 它们 有 旁 系 关系 。 在 这 种 情况 下 ,dfn(U)<< 
din (WIN U E W 的 左边 ,或 WW 在 UU 的 有 边 ,连接 旁 系 之 间 的 边 叫 模 丸 边 。 在 dis 搜 
索 中 ,G 不 产生 横 叉 边 。 或 者 说 :如 心 ,W) 是 无 向 图 G 的 一 条 边 , 则 任何 一 种 dfs 树 ( 取 不 
同 的 根 可 有 不 向 的 树 ),U REW 的 祖先 点 ,或 是 你 的 后 代 点 。 
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为 什么 ? 请 读者 自行 分 析 。 

下 面 讨论 有 向 图 的 dfs. 

有 向 图 的 dis 本 质 上 近似 无 向 图 ,区 别 在 于 搜索 只 能 顺 近 的 方向 去 进行 (有 向 边 , 简 
称 弧 )。 有 向 图 中 的 绝 根 据 被 检查 情况 可 有 4 种 ,一 条 未 检查 的 弧 (Z7, 灰 ) 可 按 如 下 4 种 情 
沉 , 分 类 归 划 成 (其 中 2. ,3. ,4. 所 述 的 三 种 情况 中 , 设 琴 EUIS: 

1. W Jizk Ui [8 x09 ex QU WO AARM CLER 4-7(a)) 

2. W 是 上 的 已 形成 的 dis SEMPER US FU IKU WEAR BTE CLER 4-702), 
XGEQU ,WW 是 择 枝 骤 还 是 前 向 弧 ,dfn《W)>>dfn(U)。 细 分 一 下 ,树枝 边 总 使 搜索 导向 一 
个 新 的 (未 访问 ?点 ,是 díÉn DD 1 —dfn (WO, 

8. W J& U 的 已 形成 的 dis 森林 中 直系 祖先 点 , 则 (, 歼 ? 称 为 后 向 弧 ( 见 图 4-7 (0, 

4. U 51 W ECER dis 森 宁 中 没有 直系 上 下 关系 ,并 县 有 día QW « dfa QU) , Bt 
XR QJ WEIL, 注意 没有 dfn(W)>>dfn(U) 这 种 类 型 的 模 叉 弧 。 因 为 dfs 搜索 只 能 从 
左 到 右 逐 条 树枝 地 进行 ( 见 图 4-7 (0). 

Ae QJ WO RS LUE OV. 的 所 有 关联 边 未 完全 检查 ) 还 是 机 灵 弧 CW 的 所 有 关联 边 
ZERE) ,dfn(W)>dfn(U)。 


W 祖 先 
# 前 向 ps 后 向 U 
Pai 
€ K^ OP POR 
) (d) 


(a) C te 


图 4-7 
秽 如 图 4-8 上 所 示 的 有 向 图 经 dis 后 , 弧 划 分 为 : 


, 
Yi — Y2 


AN AGO 


< (DO 内 的 数学 为 顶点 的 df 编码 ) 
一 al^ SG 


图 4-8 


«VV ` VV , CVV. a Ve E <V V EHHA , 组 成 dfs 森林 (用 18 
RER AVV SE AM VIVOIJÉRBI TI: VIVI VIVI EPUM. 
下 面 给 出 有 向 图 G 的 dfs 算法 : 


s 35 » 


未 志 每 条 边 示 用 过 ， 
对 0 的 每 一 个 顶点 UU， 设 dfn( 吃 0 


i 0i father(U) £g, UIDES; 


| ie i 十 1 dni; 


CAU BUM A Rt: 一 
Y 
选 一 条 未 用 过 的 迎 e 一 zi mu 已 确定 一 
De father); 
标 起 e 已 用 这 ; N 
father(V) «7 0 manent? 0 的 顶点 Vi 
N 
| fades UV; U-—V, 


三 、 无 向 图 的 dfs 程序 


由 于 有 向 图 的 dfs 本 质 上 近似 无 向 图 ,况且 这 个 算法 将 在 4. 4 节 求 极 大 强 连通 子 图 
中 还 会 使 用 到 ,因此 这 里 不 再 作 介绍 。 


program dís p94; 


const 
maxn = 80; 
type 
nade = record 
k, : L.maxn ( 项 点 类 型 DFS 编码 , 父 指针 } 
end; 
ghtype = array [1.. maxn, 1.. maxn | of integer; 
ltype = aray [1..maxn | of node; 
var 


g | ghtypes {邻接 矩阵 } 
n 1 integer; (mas 

f 4 texty { 文件 变量 》 
1 3 hype; { 顶点 序列 } 


procedure read-graph; 

var 
str ! string; 
ij: integer: 

begin 
write (Graph file — 03. i IEAHHIBEX TEE SOCIEEBGERE } 
readln (stt) 
assign(1,str?; 
reset CE) ; 
readin(fon)} — (CIE AE EJ 
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fori: =1 ton do ( 恋人 图 矩阵 } 
for js —1 to n do read d ,g[5,1]); 
closeCD , ( XB c(t ) 


end; 


procedure DFS(s + integer); 
var | 
1,v,u + integer; 
begin 
fillchar 1 ,sizeof 0,00, {1 数组 清 零 } 
is=0;v i =s; {s 作为 第 一 全 访问 结 点 , 即 深度 优先 树 的 根 } 
repeat 
repeat 
incG) [v]. k : —i, (EE v 顶点 的 din 编码 } 
repeat 
utl, 
while (u--n) and (g[v,u]« —0) do inc(u); 
( 选 一 条 未 用 过 的 与 Y RRR U> } 
gl v.u] : ——giv.uligz[u,v] : = —g[u,v]: (fes vo RR 
| until (0—n--1) or (ful,k=0); 
{ 直至 与 * 关联 的 所 有 边 都 使 用 这 或 者 <<Y,u 沁 的 顶点 4 未 曾 编码 为 止 } 
fu<>ntl ( 若 <vvu>> 的 项 点 5 未 曾 编码 , 则 } 
then begin 


writeln(v,' —' ,u); 


URTEIL uz , 设 署 上 的 父亲 结 点 为 v, 人 从业 出 发 搜索 } 
I[u]. f : —vjv : =u 
end 
until u=n +1; { É E 5j v 关联 的 这 都 使 用 过 } 
if [v]. Ec then v : —1[v]. i tv 不 是 根 结 点 , 回 戎 至 v 的 父亲 结 点 } 
until [v]. k=1 { 直至 加 涛 至 根 结 点 } 
end, 
begin 
read graph; ( 输入 图 } 
DFSO) { 从 顶点 工 出 发 , 作 深 度 优先 搜索 } 


end, 


4.3 KRAMFA 


一 、 什么 是 割 顶 和 块 


分 析 一 个 由 无 疝 图 表示 的 通讯 网 ,顶点 看 作 是 通讯 站 ,无 向 边 代表 两 个 通讯 站 之 间 可 
以 互相 通讯 。 问 


l. 车 其 中 一 个 站 点 出 现 故 障 , 是 否 会 影响 系统 正常 工作 ; 


2. 这 个 通讯 网 可 以 分 成 哪儿 个 含 站 点 尽 订 能 多 的 子 网 ,这 些 子 网 内 的 任 一 站 点 出 现 
故障 ,都 不 会 影响 子 网 工作 。 
有 了 连通 性 的 基础 知识 后 ,我 们 不 难得 出 ,问题 1 所 指 的 那个 “ 牵 一 发 动 全 身 " 的 站 


点 , 称 为 制 点 。 在 删 去 这 个 顶点 以 及 和 它 相 连 的 各 边 后 ,会 将 图 的 一 个 连通 分 割 成 两 个 或 
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两 个 以 上 的 连通 分 量 ,影响 系统 正常 工作 ; 面 问题 2 所 指 的 那些 内 部 竹 一 站 点 出 现 故障 都 
不 会 影响 其 通讯 的 最 大 子 网 , 指 的 是 没有 制 点 的 连通 子 图 .这 个 子 图 中 的 任何 一 对 顶点 之 
间 至 少 存在 两 条 不 相交 的 路 径 , 或 者 说 要 使 这 个 子 网 不 连通 ,至 少 要 两 个 站 点 同时 发 生 吏 
障 。 这 种 二 连通 分 支 也 称 为 块 。 

显然 各 个 块 之 间 的 关系 或 者 互 不 连接 ,或 者 通过 制 顶 连接。 这 割 顶 可 以 属于 不 同 的 
块 , 也 可 以 两 个 块 共有 一 个 宦 顶 。 因 此 无 向 图 寻找 块 ,关键 是 找 出 割 顶 。 下 面 有 两 个 基本 
x. 

对 一 个 给 定 的 无 向 图 ,实施 dfs 18 2018 
到 所 有 顶点 的 dfn 值 及 dfs BRE CE EREMO. 

1. WU PERU 成 为 割 顶 当 且 仅 当 存 
EU HETITA S. A S RS HER 
AFU RARA? BREER T9 32 CU P] 
4-9(22); 

2. 如 7 被 选 为 根 , 则 7 成 为 割 顶 当 且 仅 (a) 2 
LUEB CIE JLTRCLB4- 900». 

由 图 4-9(a) 可 以 看 出 ,虽然 UU 的 以 S; 
为 根 的 子 树 中 有 后 向 边 返 回 U 的 祖先 ,但 是 U 的 某 儿 子 S, 或 5S, 的 后 代 没 有 返回 U 的 祖 
先 ,因此 由 基本 事实 1 得 出 U 是 割 点 。 

由 图 4-9(5) 可 以 看 出 , 根 7 存在 两 标 分 别 以 S. 和 S: 为 根 的 子 树 , 这 两 棍子 树 疗 没有 
机 入 边 ( 元 向 图 不 存在 横 灵 边 ) ,因此 由 基本 事实 2 得 出 7 是 割 顶 。 

上 述 两 个 基本 事实 是 构思 算法 的 精华 ,为 此 引入 一 种 顶点 U 的 标号 函数 LOW QU 

LOWW) —min(Zfa(U).LOWC(GS) ,dfn(W)) 

其 中 ;5S EU Bg —T JL QU WO ISI, 

显然 LOW(C) 值 恰 是 乙 或 也 的 后 代 所 能 追 讲 到 的 最 早 ( 序 寻 小 ?的 祖先 点 序号 。 一 
BHE TAASJE EE D ded. MUA HIER LOW (UD —dfat 0X LOWO = 
día(W), 

利用 标 峡 函数 LOW ,我 们 可 以 将 基本 事实 1 重新 描述 成 ， 

Ti Use JE G Bri DON BLU U CN — ULT. S. EA LOWS dfa), Bl S 
*rS 的 后 代 不 会 追 漳 到 比 品 更 早 的 祖先 点 。 

LOW (CD) 值 的 计算 步骤 如 下 ， 

—dfn(U» 
| U 在 dis 过 程 中 首次 被 访问 3 
—min(LOW (U) ,dfn(W)) 
| BEEREZQ WB 
Bi LOWED. LOWS) 
U RLF S 的 关联 边 全 部 被 检查 时 。 

在 算法 执行 中 ,对 任何 顶点 万 计算 LOW (UV) 和 值 是 不 断 修 改 的 ,只 有 当 以 如 为 根 的 

dis 子 树 独 后 代 的 LOW fidin 值 产生 后 才 停 让 上。 
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LOW) -4 


二 、 求 割 顶 和 块 的 算法 
根据 前 面 的 分 析 求 制 便 和 块 的 算法 如 下 面 的 闻 辑 图 所 表示 。 
标志 一 切 边 未 用 过 3stack 栈 咱 空 ;所 有 顶点 的 dfn 值 署 0; 


iem UDRAS: 
ieiti dahi LowtU) «i UA Sistack; 
N URK xtti 3g 
Y | 
| 选 一 条 未 用 过 的 边 e 一 LV 标志 < 用 过 
| iss 
dín(V)«» 0 ——————à4 
NE 《UW 是 后 向 边 ) 
(VRBE) QN Low) « min( LowQU) ,dís(V) j 
father(V) --U; U-V; EN 
Y dintfether(LD)— 1 


N 
Low(U) «dia dather(L) )— Y 
ÍN Low(father(U)) mint LowCfatberQU)) Low) ) 
由 基本 事实 1 得 出 father( 中 是 着 项 。 
将 stack 收 中 包括 5 在 内 的 D 上 部 的 顶 
点 移出 ， 这 些 顶 点 连 间 {father 由 导 
出 一 个 块 ; 


A 
U--father(U) , 
NM 


特 stack 栈 中 连同 LI 在 内 U 上 方 的 顶点 移出 ， 
这 些 顶 点 过 同 初始 顶点 $ 导 出 一 个 块 ， 


end, 


—J 过 的 关联 边 


|N 
pi AE EE? (8 ULUETRA DS RU 
| ra 


例如 图 4-102) 


V. Vs -6 7 


NA 一 NA WARUNEK 
v, -一 用 fn 值 和 low 值 ) 
| 6.D (7,1) 


(b 
图 4-10 
从 YY; 出 发 , 按 上 述 算法 进行 搜索 ,得 出 dfs 树 和 各 顶点 din (LOW HE 4-10 
(7。 由 于 二 YY,>> 是 前 向 边 , 旦 dtn(7 =>, LOW (V0-—2,X LOW p 一 2, 由 基 
本 事实 1 得 出 V, ENEH V VH SVoVOVSIBIT ER, 
E 39 * 


三 、 求 割 顶 和 块 的 程序 


Program QIU - KUI HE..GE - DING ; 


const 
maxn 一 $0; 
type 
node = record 
k,i : 1.. maxn { MAXIN: dfn 编码 ,low 编码 } 
end: 
ghtype = array [1.. maxn.1. . maxn] of integer: 1 邻接 矩阵 类 型 } 
ltype = array [1.. maxn | of node; 
var 
E : ghtype; ( 邻接 矩阵 | 
n«pix-«i : integers ( 项 点数, 栈 指 针 , 恨 的 子 树 个 数 , 辅 助 变量 } 
f + text, 【文件 变量 } 
l : itype; 《顶点 序列 + 
st + array [1..maxn] of integer; ( t% | 
k »— set of 1.. maxn; { 割 顶 集 》 


function min(a,b : integer? :integer; ( 3R iL a.b 间 的 小 者 } 
begir 
il a7» =b then min : =b 
“else min ! =a 


end; 


procedure pushta t integer); ( a A f st } 
begin 
inc(p) ist ip] :=a 
end; 


functfon pop * integer, ( JE el at WIE TROC IARE i 
begin 
pop * zz&t[p ldec ip) 
end, 


procedure read. graph; 

var 
str * strings 
1,] * integer; 

begin 
write("Graph file = '5; { 输入 外 部 文件 名 并 与 文件 变量 连接 1 
read]n (str); 
assign (Í str) ; 
reset (E); 
readin C£ r0 |. ( 读 入 顶点 数 } 
fori! =] tondo 1{ AAKER 上 


* A() 5 


for j :一 1 to n do read(f.g[ i.i D; 


close(f); 
fillehar (1 ,sizeof (1) ,00, { 1 数组 初始 化 } 
p ' —Ü0,push(1), { 顶点 1 入 栈 } 


i: —1l[].k:-id[1].1:2i; { BUS 1 TRAE UUfíR] dfs(1) 二 low(1)=1 } 
k:z[]x:201(0HIESRET! 


end; 


procedure algorithm(v + integer); 
var 
u ? integer, 
begin 
for u t =1 to n do 
if g(v,u]0 ( 车 之 vu 之 边 存在 , 则 分 析 } 
then if 1[uj, k==0 ( 车 w 首 次 被 访问 } 
then begin 
inc(i)st[u]. k : —id[u].1 : 2ijpushtD; 
UB u h dis # low fit; u AUT) 
algorithm(u5; 
{ 从 结 点 出 发 ,递归 求解 } 
I[v]. 1 : 2mind[v].L1(u]. D: 
(v MULT a SEA THAIEW v H low [B1 
if Iu. 12» —1[v 1. k 
(Au X a Bg URESBBHESI E, v 更 早 的 祖先 点 } 
then begin 
if (7-15 and not (v in k) 
E-IESS MES Lt PEERS; AM BUE M 
then begin 
writeln t [' v, ] 2; 
k : = 十 [v] 
end, 
if v—1 then inc(x2; 
{ 若 v" 是 根 , 计 算 v 根 下 的 子 树 个 数 } 
while st[p ]&7v do write(pop : 3); 
{ 从 栈 中 依次 取出 至 v 的 各 顶点 ,产生 一 个 连通 分 支 } 
writeln(v : 3) 
end 
end 
else 1[v ]. 1 +: —minC[v1. Ll[u]. k) 
{ <vvd> 是 后 向 边 u 重复 沪 同 , 虽 置 "的 low 值 } 


ends 


begin 
read-graph; {输入 图 ， 
algorithm(1), { 递归 求解 制 顶 集 与 块 } 


if x>1 then writeC[' 1, Y 2; ( 车 根 不 止 有 一 个 儿子 , 刚 根 作为 割 顶 打 印 } 
end. 


sål" 


4.4 求 极 大 强 连 通 子 图 
一 、 什么 是 极 大 强 连 通 子 图 


让 我 们 先 看 一 个 例子 。 图 4-11 画 了 一 个 有 向 图 , 它 的 每 一 个 顶点 代表 某 篮球 队 的 一 
个 队员 , 它 的 弧 代 表 的 意思 是 如 果 有 一 条 从 V; 出 发 而 指向 V C GE D EROR D P. V: 
能 够 通知 V,。 


ka) (h) 
图 4il 


问 这 张 有 向 图 至 少 能 划分 用 个 最 大 子 玫 ,这些 子 图 上 的 所 有 队员 能 相互 通知 (包括 
子 图 仅 合 一 个 队员 ,表示 自己 通知 自己 )。 
有 了 过 通 性 的 基本 知识 后 ,我 们 不 难得 出 ,上 述 问 题 要 求 的 最 大 子 图 即 为 极 大 强 连通 
子 图 ,在 这 个 子 图 上 的 任 一 对 顶点 可 以 互相 可 达 。 按 这 个 要 求 划分 子 图 ,图 4-11(a) 的 有 
HERA 8 个 强 连 通 分 支 ,它们 分 别 是 由 


S= {VV} z= {Vo} 

Si (Vu? S= {Vn} 

3;—= {Vs} Se= (VV 
3S;1= {Vs} a= {Vi VaV} 


生成 的 ( 见 图 4-110022 . 

那么 ,如 何在 有 向 图 中 寻找 任意 两 个 顶点 都 可 用 有 向 路 双向 连通 的 最 大 子 图 呢 ? 还 是 
采用 dfs 算法 。 因 为 每 一 个 强 连 通 子 图 从 dfs 树 看 ,都 是 以 dfn 值 最 小 的 顶点 为 根 的 子 树 ， 
这 个 根 亦 被 称 作 强 分 支 的 根 。 

为 了 在 dfs 森林 的 基础 上 拷 强 分 支 子 桂 的 根 , 我 们 引入 了 顶点 的 标 值 函数 
LOWLINK(U); 

LOWLINK(U) = min (d£ín(U) ,dfn W)) 

K pW EAU SEU &gEH UR H RE AR Js TI ER OCT REEL ZA D FE RES 3 
支 中 的 顶点 。 

由 此 可 以 看 出 ,LOWLENK(DZ) 正 是 芝 所 处 的 强 分 支 中 从 U 出 发 先 用 树枝 绝 、 前 向 
3 Rcs Fs 80 Le DELE 6r dfn 最 小 的 顶点 的 序 值 。 而 对 于 强 分 支 的 根 ~ 显然 有 
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LOWLINK(-) 一 dtn(r)。 因 此 当 深 度 优先 搜索 从 一 个 使 dfn 编码 =LOWLINK 值 的 项 
点 U 返回 时 ,从 树 中 移 去 根 为 U 的 所 有 顶点 。 每 一 个 这 种 顶点 的 集合 是 一 个 强 分 支 , 即 极 
大 强 连通 子 图 。 
算法 揭 主 要 思路 是 用 逐步 闪 代 计算 出 LOWLINK(U) 值 。 
—dín(U) 
第 一 次 访问 顶点 口 时 ; 
—min(LOWLINK (U) ,dfn(W)) 
EAU, WAtA}, 
—min(LOWLINK (U) ,dín QW) 
处 于 同一 强 分 支 的 横 叉 弧 (0 W) pi ER; 
—min(LOWLINK (U) ,LOW LINK (8)) 
RET U KJT S 的 所 有 关联 边 后 返回 项 点 U 时 ; 
Z, 求 极 大 强 连通 分 支 的 算法 


下 面 介绍 求 极 大 强 连通 分 支 的 算法 。 


LOWLINK (U) = 


标志 一 切 边 未 用 过 ; 对 于 每 一 个 顶点 dfn(U)*0， ORE; 
stack E Z, $00, Uy es; 


| 
iiM 1idfn(U i LowLink(U)4—; UA fistack 


| 
无 以 [7 顶点 为 属 的 未 用 过 边 一 了 


)N 
选 一 条 未 用 过 的 边 e 一 DY ,标志 e 用 过 ; 
(W HRH) | LowLink (cft) —N 
V)--U,—Y--dín(V) —-0 Y 
dr stack E BUB GE eR 
(UV rift reg N 它们 导出 一 个 极 大 强 连 通 子 图 。 
Y dínCV) -»dfnQU) 
stack N (中) 已 确定 一 了 
Y —— (dintv) c diU)) . 
AND CV Æ festackc N —LowLnk UD — 
UV | “— mini LowLinkí f Cu) »LowLinkU)) 


或 是 同一 N T fri DANOM V o 
强 分 支 的 横 又 又 } | end. O00 efe — 
LowLink(U) — min( LowLink(U) diny >); 

tk. FU) 


father (LY 


In 


、 求 极 大 强 连通 分 支 的 程序 


program giu. ji da giang liang..tong de..suan. fa; 


a 43a 


type 


node = record 
k,] : 1..maxn ( 顶点 的 dfs M lowlink 值 
end; 
ghtype = array [1.. maxn,1.. maxn ] of integer; 
Itype = array [1.. maxn] of node: 
var 
g : o ghtypey ( WHER } 
nspsi,x : integers ( 顶点 数 , 栈 指针 ,辅助 变 竹 , 子 树 个 数 } 
f : text; {文件 } 
1 < lype; {顶点 序列 } 
st 1 array [1. . maxn] of integer; 


USE RT CHE GB Z7 ECT ERE } 


procedure read graph; 

var 
str * string: 
isj 3 integer; 

begin 
write('Graph file = ')j 读 人 外 部 文件 名 ,并 与 文件 变 景 连接 } 
readln (s1z2 i 
asaign(f ,str)1 
reset (f); 
readin f 22 1. ( 读 入 顶点 数 } 
for i ! =1 to n do 

for j! —1 to n do read(feg[i j]; { 读 入 邻接 矩阵 } 

closetf}; 
fillehar sizeof 2 00, ( 顶点 信息 初始 化 } 
pi1=]; 

end, 


function min(a,b 1 integer) + integer; ( 返回 ab 间 的 小 者 } 
begin 
if a7» =b then min + =b 
else min : —a 


end; 


function check(a : integer) * boolean; 
{ st Ter TEE a 返回 false, REIR true ? 
var 
i! integer; 
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begin 
check : —true; 
for i 1 =1 to p dc if a—st[i] then exit: 
check : —false 


end, 


procedure require(v ! integer) { IRL v 为 根 的 强 连通 分 支 } 
var 


u ! integer; 


begin 
incG) fv]. k : —iil[v].1:—i; — UR v Z& RIP lowlink 和 和 dfs 值 } 
inc(p) jst[p] ! =v; iv fi AURI 
for u + —1 to n do 
if giv, u 1770 ( vu! 
then if l(u]. &—0 ( Xu 未 检查 , 即 之 vy ,u 沁 是 前 向 骂 } 
then begin 


require(u) « ( 从 器 出 发 ,递归 求解 } 
Iiv]. lt 2mint(d[v1. 1, [u]. D: 
(v ILF « ARATA UE v 的 lowlink 值 } 
end 
else if (1[u]. E«I[v]. k) and check(u? 
<v SAE AMRAM o Lr 204: u 5 v 处 于 同一 强 分 支 中 , 则 修改 v 的 lowlink 值 } 
then Wy). 1 » 2 min([v1. Ld[u]. k); 
if [v]. [v k { 着 关联 于 u 的 爹 部 弧 都 检查 且 v 是 强 连 通 分 支 中 的 根 } 
then begin 
repeat { st 栈 中 至 v 的 顶点 相继 出 本 ,组 成 一 个 强 连通 分 支 } 
write(st[p] + 32;dec(p) 
until st[p+1]=v; 
writeln 
end 


end; 


procedure proceeds 
var 
x 1 integer; 
begin 
i : =0;p 1: =0; 
for x | =1 to n do if l[x]. k= 0 then require(x) 
{ 对 每 一 个 未 访问 的 项 点 , 求 以 它 为 树 根 的 强 连通 分 支 } 


end; 


begin 
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read graph, { 输入 图 } 
proceed { 计算 输出 所 有 强 连通 分 支 } 


end. 


4 5 求 最 小 点 基 
一 、 基 本 概念 


还 是 把 4. 4 节 求 极 大 强 连 通 子 图 中 的 图 4-11(z) 看 作 是 其 篮球 隐 的 通讯 图 。 现 在 ,我 
们 对 这 张 图 提 两 个 问题 ， 
l. 教练 想 要 到 知 全 体 队员 都 来 练 球 ,请 你 帮教 练 考虑 一 下 ,他 至 少 要 通知 儿 个 队员 
(然后 由 这 些 队员 转告 其 他 队员 ,才能 使 所 有 队员 都 被 通知 到 ; 
2. 教练 通知 队员 U, 时 必须 付出 一 定 的 代价 As CES A 可 以 代表 教练 给 V. 打 电 话 
所 需 的 时 间 )，, 请 你 再 帮教 练 考虑 一 下 ,如 何以 最 小 的 代价 使 所 有 队员 都 得 到 通知 。 
图 4-12 给 出 了 一 种 方案 :教练 直接 通知 ViVe Vr Vni 


后 由 他 们 转告 其 他 队员 ,全 部 队员 就 都 能 接 到 通知 了 。 但 是 ,是 yvy, 

不 是 至 少 通知 4 个 队员 呢 ? 能 不 能 再 少 通知 几 个 呢 ? —À 
大 家 试 一 下 就 会 知道 ,通知 3 个 人 就 够 了 ,例如 可 以 只 通知 PST 

Vi ,yy 和 Tu 而 再 少 就 不 可 能 了 (想起 看 ,为 什么 ) 。 Yo 


上 面 这 个 例子 很 简单 ,通过 简单 的 分 析 、 试 验 就 可 以 知道 至 
少 要 通知 三 个 人 ,但 是 如 果 遇 到 一 个 类 似 的 问题 ,而 图 中 的 顶点 
很 多 ,仅仅 靠 坛 验 就 不 行 了 。 必 须要 有 系统 的 方法 。 这 一 节 的 主要 目的 就 是 介绍 解决 这 类 
问题 的 一 种 方法 。 

首先 ,让 我 们 把 要 解决 的 问题 明确 一 下 。 在 有 向 图 中 ,如 果 存 在 一 条 从 顶点 Vi 到 V, 
的 有 向 路 ,就 称 V, E V 的 前 代 ,V EV: 的 后 代 。 我 们 从 这 个 概念 出 发 考虑 问题 。 因 为 如 
果 教 练 通知 了 Vi, 那么 所 有 V. B FAR V 就 都 可 以 间接 得 到 通知 了 ,而 要 保证 所 有 队员 都 
得 到 通知 ,由 教练 直接 通知 的 队员 集合 B 必须 具备 下 述 性 质 ," 对 于 任意 一 个 队员 Y,, 一 
定 存 在 B 中 的 一 个 三 ,使 得 Ti 是 Yi 的 前 代 ”。 或 者 说 ,B 的 所 有 后 代 包 括 了 G 的 所 有 项 
点 。 这 个 巨 集合 就 是 所 谓 的 点 大， 

设 G={V,E) 是 一 个 有 向 图 ,B 是 若 干 个 硕 点 组 成 的 V 的 子 集 。 如 果 对 于 任意 的 V, 
EV ,都 存在 一 个 VEBE V: EV BA R B Et dE, 

例如 接 刚 才 讲 的 两 个 方案 B. — V VV Vn) A B= (VV V REE. 

前 面 讲 的 两 个 问题 ,实际 上 是 求 两 个 特殊 要 求 的 点 基 .。 阿 是 1 可 以 归结 为 求 一 个 包含 
顶点 数 最 少 的 点 基 ( 即 最 小 点 基 ) ,而 问题 2 又 可 以 归结 为 另 一 类 点 基 ; 

设 图 G 的 每 一 顶点 ,都 对 应 一 个 非 负数 A V 的 权 ) ,现在 要 求 一 个 点 基 , 使 得 
它 所 包含 的 顶点 对 应 的 A 之 和 最 小 ( 即 权 最 小 的 点 基 )。 

注意 ,部 果 令 每 一 个 顶点 VV 的 权 A 都 等 于 1, 那么 权 最 小 的 点 基 就 是 最 小 点 基 ,。 因 此 
权 最 小 点 基 是 最 小 点 基 的 一 个 特例 。 

那么 如 何 求 上 述 两 个 点 基 问 题 呢 ?在 讲 算法 之 前 ,我 们 还 要 介绍 一 个 概念 ， 

k 46 . 


lk] 4-12 


设 [S:j 是 有 向 图 G 的 一 个 强 连 通 分 支 ,如 果 在 G 中 ,不 存在 终点 属于 [S:] 而 起 点 不 属 
于 [5S)] 的 弧 , 就 称 [S,] 为 最 高 的 强 连 道 分 支 。 

用 这 个 定义 判断 篮球 队 通讯 图 的 8 个 强 过 通 分 支 (图 4-100 ES 3 ES. TRICS 1E 
最 高 的 ,而 其 它 5 个 都 不 是 最 高 的 ( 见 图 4-13) 。 

在 什么 意义 上 讲 ,县 有 上 上 述 特征 的 强 连通 分 支 
SERAH? 由 最 高 强 连 通 分 支 的 定义 可 以 看 出 . 
该 分 支 与 图 G 其 它 部 分 相连 的 所 有 弧 是 向 外 伸展 的 ， 
BI V, APESIN V RAFS ILER V, 不 会 是 六 的 
后 代 。 针 对 教练 下 达 通 知 的 向 题 来 说 ,如 果 V, 是 一 个 
局 于 最 高 强 连通 分 支 [5,] 的 队员 ,那么 任何 不 属于 
[5S] 的 队员 V 是 无 法 通知 到 他 的 。 因此 教练 至 少 要 直 V 人 
接 通 知 [S,] 中 的 一 个 队员 。 

这 一 下 就 把 求 最 小 点 基 的 算法 由 来 说 得 再 清楚 不 "I 
过 了 。 如 果 顶 点 集合 B 是 一 个 点 基 , 那 么 每 个 最 高 强 
连通 分 支 的 [S,] 至 少 有 一 个 顶点 要 属于 B。 最 小 点 基 B 中 的 顶点 个 数 即 为 图 G 中 最 高 强 
连通 分 支 的 分 支 个 数 。 从 每 个 最 高 强 连通 分 支 中 任 取 一 个 项 点 就 可 以 组 成 这 个 最 小 点 基 
B, 


Vi (5a) 


至 于 求 权 最 小 点 基 的 算法 ,从 表面 上 看 似乎 比 求 最 小 点 基 复 杂 , 其 实 不 然 , 这 两 个 阿 
题 的 复杂 程度 是 差不多 的 。 要 求 一 个 权 最 小 的 点 基 , 也 需要 进行 3 个 步骤 

步骤 1 找 出 图 G=(V,4) 的 所 有 强 连通 分 支 ， 

步骤 2 人 队 强 连通 分 支 中 找 出 所 有 最 高 的 强 连 通 分 支 : 

步骤 3 从 每 一 个 最 高 的 强 连通 分 支 中 取 一 个 权 最 小 的 顶点 ,组 成 的 顶点 集 B 就 是 
一 个 G 的 权 最 小 的 点 基 ， 

其 中 步骤 1,2 和 求 最 小 点 基 一 样 ,而 步骤 3 中 ,两 个 点 基 问 题 *“ 从 每 一 个 最 高 强 连通 
分 支 中 取 一 个 顶点 ?的 方式 不 一 样 , 求 最 小 点 基 是 “ 任 取 ” 权 最 小 点 基 是 要 求 歌 的 顶点 权 
最 小 。 


二 、 求 最 小 点 基 的 算法 


求 最 小 点 基 问 题 必须 求 极 大 强 连 通 子 图 。4. 4 节 中 给 出 了 dis 算法 求解 的 过 程 。 求 极 
大 强 连通 子 图 在 图 论 中 有 很 大 应 用 价值 ,为 了 便于 读者 今后 更 好 地 开发 这 一 算法 ,我 们 在 
这 里 给 出 第 二 种 解法 。 在 求 最 小 点 基 程 序 中 ,我 们 使 用 新 方法 求解 。 

从 级 大 强 连通 分 支 的 概念 出 发 ,很 容易 得 出 一 种 解法 ， 

首先 任 取 一 个 顶点 ,然后 把 所 有 与 V, 互相 可 达 的 顶点 V; 都 找 出 来 ,这 些 顶 点 的 集 
fS (注意 V, 也 属于 $, ?生成 的 子 图 [5 (就 是 3 和 所 有 起 点 和 终点 都 属于 S. 的 弧 组 成 
的 那个 子 图 ?就 是 包含 V, 的 强 连通 分 支 ,然后 再 取 一 个 不 属于 S, 的 顶点 V ERAS V, 
互相 可 达 的 顶点 集合 8, 再 生成 一 个 强 连 通 分 支 [S;], 接 下 去 表 取 一 个 既 不 属于 S 又 不 
属于 53; 的 顶点 VV,……, 最 后 就 可 以 把 所 有 强 连通 分 支 都 求 出 来 了 ,图 的 每 一 个 顶点 都 属 
于 一 个 强 达 通 分 支 。 
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那么 ,如 何 从 一 个 不 属于 目前 任何 强 连通 分 支 的 顶点 V; 出 发 ,扩展 出 下 一 个 强 连 通 
Ar x5, 1982 

邵 果 存在 一 个 顶点 5 v, 互相 可 达 , 那 么 Yi Bde v. am (RC V; n 35V, 
EV 的 前 代 ( 因 为 V 可 达 VY,). 因 此, 要求 所 有 与 了 互相 可 达 的 陆 点 集合 Si, 只 要 先 求 出 
V 的 所 有 后 代 的 集合 RERE V. 的 所 有 前 代 的 集合 已 。 然 后 , 找 出 所 有 既 属于 R 又 属 
于 P 的 顶点 ,这 些 顶 点 就 组 成 了 集合 Sa 

AJ TR V; 所 有 后 代 的 集合 RC( 所 有 前 代 的 集合 P)》, 也 可 以 采用 一 种 标号 法 ,在 这 
种 标号 法 中 ,一 旦 能 确定 一 个 顶点 是 了 , 的 后 代 ( 前 代 )》，, 就 可 给 它 一 个 标号 十 (一 )。 RAE 
算 时 ,首先 给 Vi 以 标号 十 (一 ), 这 是 因为 Vi 可 达 自 己 , 因 此 了 本 身 也 是 V. 的 后 代 ( 前 
fO ,然后 逐步 扩大 已 标 叶 点 的 范围 。 办 渚 是 :如 果 发 现 一 个 顶点 了 iS. HT EV, 
的 后 代 ( 前 代 )* 即 存在 一 条 从 V; 3] VOX V. AVOKA. 而 与 Va 相连 接 的 是 一 条 以 
V, AB HE Lj OH V. ARAR RMR V 还 没有 得 到 标号 ,就 可 以 
给 Vi 以 标号 十 (一 )。 因 为 从 ;到 V. 的 有 向 路 (从 V 到 V. ABR Ee ESI j> 
GLAD S V A V, BUSISERCO; 到 V, 的 有 向 路 )。 因 此 V, 也 是 ,的 后 代 ( 前 
£O ,这 样 不 断 地 扩大 已 标号 顶点 的 范围 ,直至 无 法 扩大 为 止 ,这 时 所 有 已 标 导 的 顶点 就 怡 
好 是 V; 的 后 代 集 合 RARE PT. 


Vi - 
. t+ 六 «BET 
ES t t-- «RE Vi Do 
I V, 


(a) (b) 


图 4-14 


当 一 个 图 中 顶点 和 弧 很 多 时 ( 见 图 4-14) ,为 了 使 标号 过 程 有 条 不 案 , 从 而 避免 重复 ， 
通常 在 考虑 一 个 有 标号 的 项 点 Vi BELIEVED A V FERE C sj CV, HA 
二 j, 上 >) 都 考察 一 遍 。 如 果 <&,j 汪 的 终点 VV 过 j,& 汪 的 起 点 V) 还 没有 标号 ,就 给 它 标 
上 号 。 考 察 完 以 后 ,就 可 以 认为 顶点 VV, 已 经 “检查 ”过 了 ,今后 就 不 必 再 考 虚 它 了 ,因为 它 
再 也 不 会 使 别 的 顶点 得 到 标号 了 。 接 下 来 再 取 一 个 已 标 导 而 没有 “检查 ”过 的 项 点 来 考虑 
see :如 果 发 现 所 有 标号 的 顶点 都 已 经 被 检查 过 了 ,那么 很 显然 ,已 经 不 可 能 再 扩大 已 标 
号 点 的 范围 了 。 

在 讲解 标号 法 的 过 程 中 ,( ?里 的 内 容 对 应 于 求 前 代 集 合 P. 

把 上 面 讲 的 总 结 起 来 ,就 可 以 得 到 下 面 的 求 顶 点 Y, 的 所 有 后 民 的 集合 尺 和 所 有 前 
代 的 集合 已 的 计算 方法 了 ， 

1. RV 所 有 后 代 的 集合 R 

PRL V, UU S TV; 是 已 标 寻 而 未 检查 的 顶点 

步骤 2， 看 看 是 否 有 已 标号 而 未 检查 的 顶点 ,如 果 没 有 ,计算 结束 ,所 有 已 标号 的 项 点 
组 成 集合 只 。 如 果 有 , 任 取 一 个 这 样 的 顶点 Va EAER 3, 

3p9E 3. 找 出 以 V. 为 起 点 的 所 有 强 <,j 半 ,一 条 一 条 地 考虑 这 些 骤 ,如 果 <<k,j 半 的 
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终点 了 没有 标号 ,就 给 V, 以 标号 十 ,Y; 成 为 已 标号 而 未 检查 的 了 巴 点 。 这 些 弧 考虑 过 以 
Fo V. 成 为 已 检查 过 的 , 作 一 个 检查 标志 , 转 回 步骤 2。 

2. 求 顶点 Vi 的 所 有 前 代 的 集合 P 

采用 与 求 尺 集合 完全 相似 的 算法 。 步骤 1 和 2 是 一 样 的 。 叭 一 的 差别 是 步 台 3。 本 来 
ERE T Vi 以 后 ,考虑 的 是 区 VAR Lj ,现在 则 应 该 改 为 考虑 以 Vi 为 终点 
Mj k> In REL BT 6 ex V; 还 没有 标号 ,就 应 该 给 它 以 标号 ,另外 ,为 了 在 一 张 图 上 
同时 求 V; 的 所 有 前 代 与 后 代 , 那 么 在 求 前 代 时 ,可 以 用 “一 :作为 标号 。 

很 显然 ,在 求 出 集合 尺 和 以后, 既 标 有 十 又 标 有 一 的 顶点 就 是 与 w 互相 可 达 的 顶 
点 了 ;这些 顶点 组 成 了 一 个 强 连 通 分 支 的 顶点 集合 S 


三 求 最 小 点 基 的 程序 


program dian. ji; 


uses crt; 

const maxn — 100; 

type list = array[1.. maxn ] of boolean; 

var tu : array[l..maxn] of list; { 图 的 邻接 矩 妊 》 
s : list, { 记录 顶点 i 是 否 已 属于 某 强 连通 分 支 } 
n 1 integer, { 顶点 数 } 


procedure init ; 
var i,j.e,k + integer; 
begin 
elrser; 
repeat write('n 一 "2r ( 输入 顶点 数 } 
readin (n) ; 
until (n220) and (n«—maxn); 
forir—ltondo ( 邻接 给 阵 初 始 化 } 
for j ! —1 to n do 
tu[i,j] + —false, 

write('e—'); 


readin(e) ; 
for k : =} to e do ( IE A AEEEAE BRE } 
begin 
read (i); 
readin{j); 
tu[i,j] : =true; 
end; 
end, 
procedure make s. i(x ; integer;var vi : list); /构造 项 点 x 所 属 的 强 连通 分 支 vi } 
var shun, {x 的 所 有 后 代 的 集合 } 
ni, Cx if Boe Him ea } 
b t. list; EE ET PET op oou 
more t boolean; { 前 代 ( 后 代 } 和 集合 未 产生 标志 } 
bj t integer; 
begin 
for i t —1to n do ( ARKE Brie A a URRE cer ndo) 
begin 
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shunfil ! =false; 
ni[i ] * = falses 
bfi] : = false: 
end; 
shun[x] « 2true; nilx] : —true; { 设 x 在 所 属 的 强 连 通 分 支 上 } 
repeat more 1 一 felse1 { 求 出 x 的 所 有 后 代 集 全 ,这 些 后 代 设 检查 标志 } 
for i1 =l to n do 
if (shun[i]) and (not bG 
then begin 
for j1 =1 to n do 
if Cru[5 41]? and Got shun[i) 
then shun[j] : 2 true; 
more t —true; 
b[i] t =true; 
end; 
until not more; 
fori:-1tondo 1 检查 标志 初始 化 } 
bli] : —false: 
repeat more t = false; 1 求 出 z BEBÉ BU (CR e Log (ipi 
for i ! —1 to n do 
if ni[1] and {not biil) 
then begin 
for j: — 1 to n do 
if Cul j,11) and (not nij) 
then ni[j] : 7 true; 
more 1 —true, 
bii]: —uue: 
end; 
until not more: 
fori: —1 to n do : 2K x 所 属 的 强 连 通 分 支 上 的 所 有 顶点 } 
vili] : =shun[i] and ni[i]; 
end: 
function highezt(s. i ! lisi? : boolean; 
EI OLLTEEYXIGIULEBMERTES BENED ! 
| 册 强 连通 分 支 s_i 是 最 高 强 连通 分 支 , 返 回 ?rue 1! 否则 返回 false } 
var iej * integer: 
begin 
highest : = false: 
for i: —1 to n do 
for j* 1:0 n do 
if Gu[i,j]) and Gor s-i[i]? and ts_i[i]} 
then exit; 
highest : —true: 
end; 
procedure maim; 
vars i>? lists { 当前 顶点 1 属于 的 强 连 通 分 支 } 
is} £ integer! 
begin 
fori: —1 to n do ( 设 所 有 的 顶点 不 在 强 连通 分 支 上 } 
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s[i] : —false; 


for i : =} to n do 
if not sG] then ( MA 1 目前 不 属于 任何 强 连 适 分 支 
begin 
make. s i(i,8.1)4 { 构造 顶点 ij 所 属 的 强 连通 分 支 s-i } 
if highest lsi) { 若 s-i 是 最 高 强 连 通 分 支 } 


then writeln('take ' i5; ( Wi 属于 最 小 点 基 ,输出 i 
for j ' —1 to n do 

s[j] * =s[j] or s-i]; 
{ s-i 归 入 已 生成 的 强 连 遂 分 支 } 


end; 
end; 
begin 
initi ( 输入 图 } 


main, { 计算 和 输出 最 小 点 基 } 


end, 


4.6 可 靠 通 讯 网 的 构 作 
一 , 问题 及 其 分 析 


构 作 一 个 具有 x 个 通讯 站 的 有 线 通 讯 网 ,使 得 敌人 人 至少 炸 坏 我 w 个 (m 二 ) 通 讯 站 
后 ,才能 中 汤 其 余 的 通讯 站 的 彼此 通话 。 显 然 有 两 个 要 求 是 必要 的 ;一 是 不 怕 被 敌人 人 昨 坏 
站 的 数目 要 多 ,二 是 整个 造价 要 低 。 这 个 实际 问题 的 数学 模型 如 下 ; 

G 是 加 权 连 通 无 向 图 ,xm 是 给 定 的 自然 数 , 求 G 的 最 小 权 的 m 连 通 生成 子 图 。 当 闫 一 
1 时 , 它 就 是 3. 1 节 所 讲 的 求 无 向 图 的 最 小 生成 树 ; 当 ml 时 是 尚未 解决 的 难题 之 一 。 

我 们 将 原来 的 问题 作 两 条 限制 后 就 可 以 解决 ， 

l. G 是 完全 图 ; 

2. 每 边 的 权 皆 为 1。 

因为 当 每 条 通讯 线 ( 无 论 其 长 短 )? 都 造价 一 样 时 ,要 满足 第 1 个 要 求 , 最 理想 的 铺 况 无 
非 是 诛 来 每 两 个 通讯 站 之 间 皆 能 彼此 通话 。 但 这 祥 做 造价 太 高 ,必须 在 满足 第 工 个 要 求 的 
前提 下 尽 可 能 多 地 城 小 通讯 线 数 ,让 达到 两 个 要 求 同 时 满足 。 换 句 图 论 的 话说 , 当 避 为 = 
个 顶点 的 完全 图 且 每 边 权 此 为 1 时 , 求 一 个 局 的 边 数 最 小 的 m 连通 子 图 。 

A flm,n) 表 示 个 顶点 的 m 连通 子 图 中 边 数 的 最 小 值 (x<<n)。 由 GG 的 个 顶点 的 
次 数 和 一 2XG BOXE KSK SG 的 巴 点 度数 的 最 小 值 ( 和 A K A G 的 连通 度 和 边 连通 
度 ) ,得 出 ， 

finn) > (m n/2} 

由 上 可 见 , 构 作 一 个 由 最 少 边 数 连接 个 顶点 的 m 连通 图 。 这 个 图 的 边 数 恰 为 irmny 
2} ,此 图 记 成 Hs. 

我 们 根据 mw 和 的 奇偶 性 作 图 。 

1. Xm 是 情 数 (m= 二 27) 

Hs 以 10,1 "yn 一 1) 为 顶点 集 台 。 当 1 一 7 所 ji 十? 时 ,在 顶点 i 与 ;之 间 连 一 条 
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边 。 这 里 加 法 在 mod n 意义 下 进行 。 例 如 4-15(a) 是 构 作 的 HE 

2. 35 m 是 奇数 (m 一 2r 十 1), 先 构 作 瑟 >,- 图 ,然后 再 根据 = 的 奇偶 性 添 边 ， 

n 是 偶数 : 

对 l1usn/2 的 i, 在 i 与 i 十 n/2 向 加 上 一 条 边 得 五 ;+1.。。 例 如 4-15C5) 是 构 作 的 
Hi fa 

n 是 奇数 ， 

在 顶点 0 与 顶点 ln 一 1)/2, 顶 点 0 与 顶点 tn 十 1)/2 之 间 加 上 两 条 边 , 在 顶点 i 与 顶点 
i 十 (十 1)/2 [8L EG RH ais O1) /2, IA SI H uus. WN 4-15 CORRER Hs. 
图 。 


Z, K H.. BHF 
下 面 是 求 五 .图 的 程序 。 


program harary. p53; 


var 
m;n;i;j 1 integer; 


procedure init; 
begin 
repeat 
write(^m n = 'J,readln(m,n2) | 读 入 连通 数 和 顶点 数 } 
until (man) 
end; 


function change(a,n + integer) * integer; { 返回 & RRL n 的 余数 } 
begin 
fa<0 
then change : 二 {n 十 a) mod n ( Mittit RA } 
else change ! —a mod n { 顺 时 针 取 余 } 


end; 


procedure A(r,n : integer); 
dL 


(ELO. .nm 一 1} 为 顶点 集合 , 当 i 一 r 丢 并 在 mod n 定义 十 进行 ) 所 i 十 + 时} 
{ 在 顶点 1 与 j 之 疝 连 一 条 边 } 
begin 
for i: =0 to n—1 do 
for j*—i—r to i-r do 
if change(j,n227i then writeln Gi + 2,! ——' ,change(j,n2 : 2) 
end; 


procedure ppj 
begin 
if not odd (m). ( m 是 偶数 SE Haat 
then A(m div 2,n) 
' else if not odd(n) 1 to 是 奇数 ,是 偶数 } 


then begin 
AC(m—1) div 2,10: { 先 构 作 Hau) 
for i: —1 to n div 2 do writeln(i t 2,' ——' ,i4-n div 2), 
{在 i 与 i 十 n/2 Am EXE OS is n/2 ,得 Heu] 
end 


else begin ( m ÆR .n 是 奇数 } 
A(Gn— 1) div 2,n)s ( efl fE Haa? 
{ 在 顶点 0 5508 3: — 15/2 之 间 , 顶 点 0 59 Cn 1/2 之 间 加 两 边 } 
writeln(O 1! 2, —-',(in— 12 div 2 :1 2)1 
wziteln(0 : 2,' —',(n4-1) div 21: 2); 
for i ! =} to (n—1) div 2—1 do 
CXEHETR EE 1S TRU itat MAUSS a ND, f Het.) 
writelnti : 2,' ' AF G1) div 221 


end 
end; 


-begin 
init: ( DEA EGRE C m MHAM n) 
pp ”{ 构 作 可 带 通 讯 网 并 输出 } 


end, 
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第 五 章 ”支配 集 与 独立 集 


5.1 求 支 配 集 
一 、 问题 及 其 分 析 


HE V VaV, 这 N 个 城镇 建立 一 个 通 迅 系统 ,为 此 了 其 这， AER PE SE JURE A 
镇 ,在 那里 建立 中 心 台 站 ,要求 它 们 与 其 它 各 城镇 相 邻 ,同时 为 降低 造价 ,要 使 中 心 台 站 数 
目 最 少 . 有 时 还 会 提 其 它 要 求 。 倒 如 在 造价 最 低 的 茶 件 下 ,需要 造 两 套 ( 或 更 多 套 ) 通 讯 中 
心 , 以 备 一 套 出 故障 时 启用 另 一 套 。 

例如 图 5-1 在 作 是 一 个 通讯 系统 。V ,VV 是 一 些 


城镇 , 仅 当 两 城 之 间 有 直通 通讯 线 时 ,相应 的 两 顶点 连 一 条 n yp, 

边 。 在 讲 这 个 问题 的 数学 模型 之 前 , 先 讲 一 个 定义 ， 
D 8 G 的 一 个 顶点 子 集 ,对 于 G 的 尾 一 顶点 局 ,要 么 5 

U RD S88 — V BLEGER EAS D HP — 4 BUSAR, - 


ÓÉADOEGBE—TXNSSE. FEDERERA 
后 DD 不 再 是 支配 集 , 则 支配 集 D 是 极 小 支配 集 。 称 G 的 所 有 支配 集中 顶点 个 数 最 少 的 支 
配 集 为 最 小 支配 集 五 ,, 记 7Y(G) 一 六 中 的 顶点 个 数 , 称 作 刁 的 支配 数 ， 

由 上 还 定义 可 知 , 凡 最 小 支配 集 一 定 是 极 小 支配 集 ; 任 何 一 个 支配 集 以 一 个 极 小 支配 
SUI CT SG 所 含 的 极 小 支配 集 可 能 有 两 个 以 上 ,而 有 其 顶点 数 也 可 以 不 一 致 ,但 支配 
数 Y(G) 是 唯一 的 。 

显然 中 心 人 台 站 的 选 址 问题 ,实际 上 是 求 一 个 能 与 G 中 其 它 顶 点 相 邻 的 项 点 集合 , 且 
这 个 顶点 集合 所 含 的 顶点 元 素 必 须 最 少 , 即 求 狠 的 最 小 支配 集 。 若 建 两 套 , 则 从 一 切 极 小 
支配 集 DDoe D, 中 选取 D. 和 DD, ,使 得 D.()D.— eo 为 支配 数 , 傅 小 多 好 ). 即 其 中 
-Ehki REAA ELE, HEID UD | =mi D| HDI 1i jd. DIOID, 
=p HAEE RTR ER o Ep E ES B RC IRE P 

例如 在 图 5-1 所 示 的 6 TRAFEGAM, ARKi OV (Vi Vesh (Vi iY 
Vao Vst {VV Vs ， 这 些 顶 点 集 含 为 极 小 支配 集 。 若 建 一 套 通 讯 中 心 , 只 需 建 立 在 
WERNE WV 建 一 套 , V V REV Vo EEE. 

有 许多 实际 问题 可 以 转化 成 上 述 这 种 数学 模型 来 处 理 。 

支配 集 有 哪些 人 性质 呢 ? 

|. 车 妃 中 无 零 次 顶点 (dtu) 一 D), 则 存在 一 个 支配 集 D. ift C 中 除 D 外 的 所 有 人 顶 
点 也 组 成 一 个 支配 集 ; 

2. 车 上 中 无 零 次 顶点 (dw) 一 0 ,Di 为 援 小 支配 集 . 则 尼 中 除 互 | 外 的 所 有 顶点 组 成 
一 个 支配 集 。 

求 所 有 极 小 支配 集 的 计算 ,包括 5.2 节 中 的 求 所 有 极 小 覆盖 集 的 计算 都 是 采用 逻辑 
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运算 的 。 
设 X,.Y.Z 三 条 指令 ， 
HE ALAT XRAM Y” WXY MER) 


"X 5 Y ARH T” 记 作 XY (与 运算 ) 

上 述 逻 辑 运算 有 凡 下 运算 定律 ， 
1， 交 换 律 

X+Y=Y+}X; XY-YX 
2. AAR 

(XY) -Z- X-FC'- 2); (XY)Z=X (Z) 
3. 分 配 律 

XQ--Z)—XY--XZi (Y+Z)}X=XY+XZ 
4. 吸收 律 


X+X=X; XX=X; X+4XY=X 
EREEREER eS PUE NCBORCRUR EREHE PAAK. 
求 所 有 极 小 支配 集 的 公式 ， 
eV, VaL) = TI(r+ y u) 


UENW 


-ARARE E ftn A ATMA — ATA SL ATAR ER ER 
过 程 中 根据 上 述 运算 规 律 展开 成 积 之 和 形式 ,每 一 积 项 给 出 一 个 极 小 支配 集 , 所 存 积 项 给 
出 了 一 切 极 小 支配 集 ,其 中 最 小 者 为 最 小 支配 集 。 
例如 求 图 5-1 通讯 网 的 一 切 极 小 支配 集 及 支配 数 。 
Pa 
— (V EV4--V,-V OV +V HV VV V OQ HV: HV +Y VV) 
VHV HVO tt Ys) 
二 《1 十 2 十 3 十 4) (2 十 1 十 4) (3 十] 十 43(4 十 1 十 2 十 3 二 5 十 6)(5 十 4 十 6) (6 十 4 十 5) 
二 16 十 16 十 4 十 235 十 236 
故 得 所 有 极 小 支配 集 如 下 ，; 
(V Ve} (Vi Ve IUS (Va Va Ys} {Ve Va Vat 
7(G) 一 1 


Z., 求 极 小 支配 集 和 支配 数 的 程序 
下 面 根据 公式 和 运算 定律 ,给 出 求 所 有 极 小 支配 集 和 支配 数 的 程序 。 


Program ji-xiao..zhi_pei_ji: 


Const 


maxn 一 30; 
type 
ghtype = array [ 1.. maxn,1.. maxn ] of integer: 
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settype = set of 1.. maxn: 
type = array [1. . maxn ] of settype; 
var 
g : ghtype; { BRER } 
n,l 1 integer; ”1{ 顶点 数 , 极 小 支配 集 的 个 数 } 
f 1 text; { 文件 变量 } 
it 1 dtypes { 极 小 支配 集 } 
procedure read graph; 
var 
str ! string: 


i,j + integer; 
begin 
write Graph file = '), 《输入 文件 名 ,并 与 文件 变量 连接 } 
readln (str); 
assign(1 ,str) 
reset (Í); 
readin (1 ,n) , { 输入 项 点数 } 
for i t —1 to n do 
for j* —1 to n do readtf,g[i,j D « 1 输入 轿 的 邻接 矩阵 } 
closeCÍ? ; 


end; 


procedure reduce(s 1 settype), 
{ 根据 吸收 律 求 s 十 1L1] 十 tt[3 十 … 十 1 的 结果 } 
i,j + integer; 
begin 
1! =1; 
while i< =l do ( 检查 所 有 支配 集 } 
begin 
if s x It[1]—Ht[i] then exit; 
(XBiTxESEsMETJS.URHIIRRS 
if s «It[i]—5 
{ 若 s 是 第 i 个 支配 集 的 子 集 , 则 删 涂 该 极 小 支配 集 } 
then begin 
for j + =i+1 tol do ltD—1]* =1tLi]; 
dec(D 
end 
else inc(i) 
(Cami ze Rx BER ERNA d 。 子 集 的 支配 集 } 
{ 查 至 某 支 配售 作为 s 的 子 集 或 所 有 支配 集 与 s 非 子 集 关系 为 止 } 
endi 
incCDilt[]] 9 =s Us EHE —- XUI) 
end; 


procedure think; 
var 
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tlyi,jrk integer; 


t ! Itype; 
begin 
l: 0; 


fori: =1 to n do if G=1) or (g[1:1]770) then reducet[1]): 
{ 建立 中 十 ,各 u 各 项 存 人 lt } 
uer d 


forit =2 to n do 


begin 
t: 二 [tytl: =1; { 暂 存 所 有 支配 集 lt 和 支配 集 个 数 } 
l: =0; 


for j: =1 to n do 


UGR(v D u) (v Z ujela D u HARAN Nk]? 
sE NC) nEMiv,) ut Niy) 


if G=j) or Cg[i,j] 0 
then for k 1 一 1 to tl do 
reduce(t[k1-- G) 
end; 
lt * ub: =t { 求 出 L 个 极 小 支配 集 1t ) 


ends 


procedure print, { 打印 1 个 极 小 支配 集中 的 所 有 元 素 } 
YaT 
ij : integer; 
begin 
for i * —1 to | do 
begin 
writeti : 3); 
for jt =1 to n do if j in It[i] then writeCj : 3) 
writeln 
end 
end; 


begin 
read graph; (输入 图 } 
think; { 计算 极 小 支配 集 } 
print { 输出 结果 } 


end. 


5.2 求 独立 集 
一 问题 及 其 分 析 


S 一 {93Se…y3。} 为 信息 传送 的 基本 信号 集合 。 

可 以 把 信号 S; 设想 成 汉字 或 拉丁 字母 。 统计 规 律 表明 哪些 信号 与 哪些 信号 易于 发 生 
错乱 .例如 输入 Si, 输出 应 该 是 5S7 Coi) ,但 由 于 干扰 发 生 了 错乱 ,5, 可 能 和 S. 错乱， 
S51 还 可 能 和 5; 错乱 等 。 例 如 已 知 错乱 可 能 性 如 图 5-260 pa. 

为 了 确切 地 从 输出 信号 得 知 输入 信号 ,我 们 不 能 选用 5S1,5;,… 5. 中 的 每 一 信号 ,只 
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能 队 中 选 一 部 分 用 于 输出 。 那 么 选 哪 一 部 分 信号 作 
输入 源 呢 ? 我 们 作 另 外 一 张 图 ,顶点 表示 信号 ,车 信 5 5t 
5i 5, 可 能 输出 Si IHE S: 与 5; 之 疗 连 一 条 边 ,如 T. 
图 5-2(6)。 为 了 使 可 用 于 输出 的 信号 最 多 ,我 们 在 354 

图 5-2(0》 上 求 这 样 一 个 顶点 集合 7,7 中 任 两 个 顶点 7 
不 相 邻 目 这 些 独立 的 顶点 教 最多。 例如 可 以 选 {9, (a) e 

AE EE AEE ELA EAER EEA 图 52 
SORIS ,8Ss) 做 输出 信号 。 这 个 数学 模型 就 是 所 请 

的 求 最 大 独立 集 何 题 。 

在 实际 生活 中 , 求 最 大 独立 集 的 应 用 实例 很 多 ,如 8 皇后 问题 。 我 们 将 棋盘 的 每 个 方 
格 看 作 一 个 顶点 ,放置 的 皇后 所 在 格 与 她 能 攻击 的 格 看 成 是 有 边 连 接 , 从 而 组 成 64 个 顶 
点 的 图 .车 机 设 计 一 个 算法 ;放置 尽 可 能 少 的 皇后 ,使 她 们 控制 棋盘 上 全 部 格 ,这 暴 然 是 求 
最 小 支配 集 问题 ;再 设计 一 个 算法 ,要 放置 尽 可 能 多 的 皇后 ,而 相互 不 攻击 地 共处 .这 个 问 
题 就 是 求 最 大 独立 集 问 题 了 ， 

在 讲求 最 大 独立 集 的 定义 之 前 ,我 们 先 引出 与 独立 集 密切 相关 的 覆盖 集 的 概念 : 天 
是 G 图 的 一 个 顶点 子 集 且 G 的 每 一 边 至 少 有 一 个 端点 属于 到, 则 称 KK 是 G 的 一 个 里 盖 。 
这 里 改 盖 一 词 的 含义 是 顶点 覆盖 全 体 边 。 若 在 K 集中 去 除 任 一 顶点 后 将 不 再 是 覆盖 ,出 
称 K 为 极 小 履 盖 。 在 图 G 的 所 有 极 小 覆盖 集中 含 顶 点 数 最 少 的 极 小 覆 蔓 称 作 景 小 覆盖 。 
用 <(G) 表 示 最 小 覆盖 的 顶点 数 , 叉 称 G HRAN. 

例如 图 5-3 中 的 黑色 项 点 是 一 个 极 小 覆盖 ,同时 也 是 一 个 最 小 

£oQG)—4.K—(VL,V,VS VO FS Id AADdBES : Vs 

I 是 GG 的 一 个 项 点 子 集 ,J 中 任 两 个 顶点 不 相 邻 , 则 称 了 是 图 6G D 
的 一 个 独立 集 。 车 独立 集 了 中 增加 任 一 个 除 7 RTU I pe v 
独立 集 , 则 称 了 是 极 大 独立 集 。 在 图 G 的 所 有 极 大 独立 集中 含 顶点 "E 
数 最 多 的 极 大 独立 集 称 作 最 大 独立 集 。 用 8(G) 表 示 最 大 独立 集 的 顶 
BR, LEG 的 独立 数 。 

那么 独立 集 又 有 什么 性 质 呢 ? 我 们 从 独立 集 、 覆 盖 集 ,支配 集 之 间 关 系 中 论述 ， 

1. 一 个 独立 集 是 极 大 独立 集 , 当 目 仅 当 它 是 一 个 支配 集 ; 

2. 了 是 独立 集 . 当 和 且 仅 当 G 中 除了 集 外 的 所 有 顶点 是 一 个 禾 盖 集 ; 

7 是 极 大 (最 大 ) 独 立 集 , 当 且 仅 当 G 中 除 工 集 外 的 所 有 顶点 是 一 个 极 小 (最 小 ) 履 盖 
集 , 即 

e(G) + BG) = G 的 顶点 数 

3， 极 天 独立 集 必 为 极 小 支配 集 ;但 是 极 小 支配 集 未 必 是 极 大 独立 集 。 

例如 一 个 含 边 数 为 4 的 图 上 的 两 个 相 邻 项 点 是 极 小 支配 集 , 但 不 能 为 极 大 独立 集 , 连 
独立 集 也 不 是 。 

例如 图 5-3 PV VaV ,Ve} 是 一 个 最 小 覆盖 集 ,V 一 尺 二 (Vo,Vs) 是 一 个 最 大 独立 
集 同时 又 是 一 个 极 小 支配 集 。 注 意图 5-3 中 的 最 小 支配 集 是 {V。} 不 是 独立 集 ， 

由 于 极 大 独立 集 与 极 小 覆盖 集 有 互补 性 ,我 们 这 里 仅 给 出 求 所 有 极 小 覆盖 集 的 计算 
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公式 ,读者 可 以 由 此 推出 极 大 独立 集 : 
AV, Varte V.) = TY; 十 Hi U) 


某 顶 点 的 所 有 相 邻 顶 点 进行 积 运算 后 再 与 该 项 点 进行 和 运算 ,组 成 一 个 因子 项 。 几 个 
因子 项 过 乘 .并 根据 逻辑 运算 定律 展开 成 积 之 和 形式 。 每 -- 积 项 给 出 一 个 极 小 覆盖 集 , 所 
有 积 项 给 出 了 一 切 极 小 覆盖 集 , 其 中 最 小 者 为 最 小 覆盖 集 。 

例 姬 求 图 5-4 中 的 一 切 极 小 覆盖 集 和 覆盖 数 atG) 以 及 


一 切 极 大 独立 集 各 独立 数 8(G)，。 v 7 V: 


= (12-246) (2-136) (3+ 246) (42-135) (53- 3460 (6-125) Vs s 
2:2456--1356-4-1346-1-23464-1245 -- 1235 图 54 
EHRE SE P 
Va Vo Vo Ve {ViVa V Vate 
{ViVa Va Va} {Vo Va Va Voy, 
(ViVa VaV {Vi Vz Vs Vso 
g(GI= 4 
由 于 G 的 除 极 小 覆盖 集 外 的 顶点 可 组 成 极 大 独立 集 , 由 此 可 以 得 出 一 切 极 大 独立 集 为 
V — (V;,V4,V,,V4) 9 {Vi V): 
V — (VU, Vi Vs Ve} (Quia 
V — (V, Va V V} = {VV}; 
V — {V Va V, V (Vgl 
V — {VV V, Vs} — {Vs Ve}s 
V—{ViVe VV}={V, Veta 
BCG) 一 2 
FARRAR, HEGERE NEAS. 


二 . 求 所 有 极 小 覆盖 集 的 程序 
下 面 我 们 给 出 求 所 有 极 小 改 董 集 的 程序 。 


program ji xiao fu gai -jis 


const 
Tmaáxn 一 40; 
type 
ghtype = array [1..maxn, l.. maxn ] of integer; 
settype = setof 1..maxn; 
ltype — array {1..maxn | of settype; 
var 
g : ghtypes { AERE! 
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nl 1 integer; { 顶点 数 , 极 小 覆盖 集 个 数 } 
f. £ tert; { 文件 变量 } 
lt : ]typei ELS i: SUE E. LS ELLSL* C 
procedure read. graph; 
var 
str ! string: 
1j ! integer; 
begin 
writeC Graph file — 0, 1 输入 文件 名 并 与 文件 变量 连接 } 
readln (str)s 
assign(f ,str2; 
reset(1); 
readinCf .n?, { 输入 顶点 数 和 图 矩阵 } 
for i : —1 to n do 
for j! =] to n do read(f.gli.3 D: 
clase(f); 
end ; 


procedure reduce(s ! settype) ; ( WERKER s- FRUI ]H--- +H } 
var 
i,j * integer; 
begin 
it =}; 
while i< =1 do 
begin 
if s € [i] Hifi] then exit; 
is æ lt[i]=:s 
then begin 
for ji =i+1 tọ | do lt[j—1]: =It[j]s 
dec(1) 
end 
else inc(i? 
end; 
ine CIJ; [i]: =s 
end; 


procedure think; 

var 
tl i sjik 5 integer; 
t * Itype; 
a ! settype; 

begin 
k[1] : —[1]:h(2] : 20 * 2; 
lori: —2 to n do if g[1,i]J>0 then [2] s -hi(2]2- [i]; i 建立 ww 十 [T «9? 


ue N40 


fori: —21:ondo (OR fT + [[ W} 


i-i 1€ NC 
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begin 
t: =ltitl: =i; 
1: =0;s : =[]; 
for j + =1 to n do if gli j]>0 then s + =s+ (5l; 
{ 求 所 有 与 顶点 i 相连 的 顶点 集合 s } 
for k : —1 to tl do 
begin 
reduce (t[k1-4-3) ;reduce G[k ]-- [1]? 
(AB I eR GL] H REED G-TPODAS PER EBUR } 
end 
end; 
lr: =t]: =t} 
end; 


procedure print; 
var 
i,j * integet; 
begin 
fori: 一 1 to 1 do { 打印 每 个 羔 积 项 ( 极 小 柳 盖 集 ) 的 元 你 } 
begin 
writeti + 3); 
for js =1 to n do if j in tt[i] then writeGj 3)3 


writeln 
end 
end; 
begin 
read-graph; {输入 图 } 
think; OGEEBUPNMS } 
print { 输出 结果 } 
end. 


sle 


第 六 章 ”网 络 流 及 其 应 用 
6.1 求 网 络 的 最 大 流 


许多 系统 包含 了 流量 问题 .例如 ,公路 系统 中 有 车 辆 流 ,控制 系统 有 信息 流 , 供 水 系统 
中 有 水 流 , 金 融 系 统 中 在 现 金 流 等 等 。 

6-i(e) 是 联结 产品 产地 V, fO V. 的 交通 网 E ULCV LV OUR V, FL V É 
:运输 线 , 产 品 经 这 条 强 由 VV, ARE V MARATEA E I7 ETE. EUR WAP 
后 简称 容量 )。 产 品 经 过 交通 网 从 Vi 输送 到 了 ,。 现 在 要 求 制定 一 个 运输 方案 ,使 W, 运 到 
Vi 的 产品 数量 最 多 ，。 


E 6-1 


所 谓 运输 方案 ;无非 就 是 说 ,从 产地 运 出 多 少 物资 ,其 中 多 少 吨 沿 这 一 条 路 送 到 销 地 ， 
多 少 吨 沿 那 一 条 路 送 到 销 地 等 等 ,图 6-10%) 就 给 出 了 这 样 一 种 运输 方案 ,2 百 吨 物资 沿 有 
向 路 P, CV,,V;,V4,V,,VO is 8| 83h 2 百 吨 物 资 沿 有 向 路 PatV syV Vs; REESE 
35.1 百 吨 物 资 沿 有 向 路 PIC. ,yyYs,Ve) 运 到 销 地 .。 每 条 弧 旁 的 数字 表示 方案 中 每 条 运 
输 线 上 的 实际 运输 量 。 这 些 数 必 须 满 足 一 些 条 件 , 即 ; 

L 实际 运输 量 不 能 是 负 的 ; 

2. 每 条 弧 的 实际 运输 量 不 能 大 于 该 弧 的 容量 ; 

3. 除了 起 点 V 和 终点 Ve 外 ,对 其 它 顶 点 来 说 ,所 有 指向 V 的 弧 上 的 运输 量 的 和 应 
该 等 于 所 有 从 V. 出 发 的 绪 上 的 运输 量 的 和 。 

这 3 个 条 件 中 的 前 两 个 条 件 的 必要 性 是 显然 的 ,条 件 (3? 也 是 不 难 理 解 的 .因为 ,除了 
起 点 和 终点 以 外 ,其 余 项 点 都 不 过 是 一 些 “ 中 转 站 ”, 它 们 既 不 能 产生 物质 也 不 能 围 积 物 
质 ,因此 运 到 它 那里 的 物质 是 多 少 吨 ,从 它 那 里 运 走 的 也 应 该 是 多 少 配 ,不 能 多 也 不 能 少 。 
显然 ;方案 中 的 所 有 数 满 足 了 这 3 个 条 件 ,因此 方案 是 可 行 的 ,但 问题 是 ,用 图 6-100 R7 
案 将 5 百 吨 的 物质 从 V iss V. 在 这 个 交通 网 上 网 的 输送 量 是 否 还 可 以 增多 ,或 者 说 这 
个 运输 网 中 .从 VY 到 ys 的 最 大 输送 量 是 多 少 呢 ? 本 节 将 要 研究 类 似 这 样 的 问题 。 
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一 、 基 本 概念 


1， 网 络 与 流 

网 络 D—(V,A,C) 

设 吕 是 一 个 简单 有 向 图 (DCV,4))。 在 V 中 指定 了 一 个 顶点 , 称 为 源 点 ( 记 为 V,) 
和 另 一 个 顶点 , 称 为 汇 点 ( 记 为 V0), 对 于 每 一 条 弧 (Vi,Vj) 有 4, 对 应 有 一 个 Cj 之 0; 称 为 
弧 的 容量 。 通 常 我 们 就 把 这 样 的 D 叫做 一 个 网 络 , 记 作 D=O ,4,C)。 

ET 2 

所 请 网 络 上 的 流 是 指定 义 在 弧 和 集合 4 E89 rS FS {Fat ,并 称 FUOBWOSVO 
上 的 流量 。 

例如 图 6-1(z) 即 一 个 网 络 ,指定 了 为 源 点 ,Ve 是 汇 点 ;其 它 的 顶点 是 中 间 点 。 缀 旁 的 
数字 为 C;;。 图 6-1(6) 所 示 的 运输 方案 ,就 可 看 作 是 这 个 网 络 上 的 一 个 流 , 每 个 绪 上 的 运输 
量 就 是 该 弧 上 的 流量 , 即 ;Fis==3;Fis= 二 2,Fa 二 2,Fu 一 0,Fy 二 1,Fy=2, Fs=2, Fw=2, 
Fas—0,Fs=3。 

2. 可 行 流 与 最 大 流 

可 行 流 (可 行 流 的 流量 VF) 

满足 下 述 条 件 的 流下 FORT: 

(1) FERHAT: 

HERV VEA OSF; 

D 平衡 条 件 ， 

对 于 中 间 点 : 

Wu qo BEREIT GS 

Vi; 的 流出 最 23 F, — V, 的 流入 基 » Fs-9 


对 于 源 点 5 
V, 的 流出 量 21 Fu 一 了 的 流入 量 DEL = 源 点 的 净 输 出 量 Y(CF)。 
(SV OeA 


对 于 汇 点 工 : 
V: 的 流出 量 P V, 的 流入 量 J F= Da 汇 点 的 净 输 入 量 了 (7。 
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式 中 V(F3 称 为 这 个 可 行 流 的 流量 , 即 源 点 的 净 输 出 量 (或 沪 点 的 净 输 入 量 )。 可 行 流 
总 是 存在 的 。 例 如 ;: 令 所 有 弛 的 流量 Fu 一 0, 就 得 到 一 个 其 流量 VY(P) 一 0 的 可 行 流 ( 称 为 
零 流 )。 

最 大 流 问题 即 求 一 个 流 {F) ,使 其 流量 VCF) 达 到 最 大 ,并 且 满 足 : 

0x Fy LCVV EA 
VG» Gs) 
SEs zw- (i) 
—VQ)  G-0 
3、 可 改进 路 P 
* 63 。 


车 给 一 个 可 行 流 下 = CF,) ,我 们 把 网 络 中 F;—Cul 319g 2s RUE; C, UP OS 
RAM, F= HWA EAM, F AMAER. 
如 图 -LOR (/,, V FRI QA, VO AFR. V V DART CV VO ERAM CEFA 
EEZ cE 
若 己 是 网 络 中 联结 源 点 V, 和 汇 点 V, 和 一 条 路 ,我 们 定义 路 的 方向 是 从 V, 到 V. , Ut] 
路 于 的 允 被 分 或 两 类 ,一 类 是 弧 药 方向 与 路 的 方向 一 致 ,叫做 前 向 络 。 前 向 弧 的 全 体 记 为 
P+. 5-35 808 77 PURUS. HUS LRL. Je p ua din P—. 
图 6-12) rH, ERR P= {V VaV VSVOm 
P += {Vy Vo. CV V) ,CV VO) 
P—= ((V,,V) 
下 面 可 引出 可 改进 路 P 的 定义 : 
设 下 是 一 个 可 行 流 ,P 是 从 VV, 到 VV, 的 一 条 路 , 若 P 卫 满足 下 列 条 件 ， 
CD 在 PP 的 所 有 前 向 弧 CV;,V,) 上 ,0 所 Fy<Cy, 即 了 十 中 的 每 一 条 弧 是 非 人 饱和 强 ， 
(2) E P ISEUÉ LR ISBEC, VO EO FC, B) 下 一 中 的 每 一 条 弧 是 非 零 流 弧 。 
MF P 为 关于 可 行 流 下 的 一 条 可 改进 路 .显然 到 
vy WAA v. 6-2 给 出 的 路 P. JR EXCEPIT AR (E ,是 一 条 可 改进 路 。 那 
,Rumd FEA NURK 么 ,为 什么 将 具有 上 述 特征 的 路 P 叫做 可 改进 路 ,原因 
P. ; V 是 可 以 通过 修正 PP 路 上 所 有 流量 FERRA KAM 
F 改进 成 一 个 值 更 大 的 流 F. 下面 我 们 具体 地 给 出 一 种 
图 63 方法 ,利用 这 种 方法 就 可 以 把 下 改进 成 一 个 更 好 的 流 
Fi。 这 种 方法 是 ， 
CD 不 属于 可 改进 路 已 的 弧 人 YY 上 的 流量 一 概 不 恋 BI Fu FS 
(2) 可 改进 路 已 上 的 所 有 弧 (Y, ,7)) 上 的 党 量 按 下 述 规则 变化 ， 
EMAV V b, Fium Fata 
rd AE CCP SE Fyu—Fij-a 
ea 称 为 可 改进 量 , 它 应 该 按照 下 述 原则 确定 :a 既 要 取得 尽量 大 , 叉 要 使 变化 后 的 FF; 
仍 满足 可 行 流 的 两 个 条 件 一 一 容量 限制 条 件 和 平衡 条 件 。 不 难看 出 ,按照 这 个 原则 ,az B 
不 能 超过 每 条 前 向 弧 的 Cx 一 5 ,也 不 能 超过 每 条 后 向 张 的 Fus 因此 a PETERS BUT TK E 
的 Cy 一 Fj 与 后 向 张 上 的 FLUE BEIM. 
图 6-2 给 出 一 条 可 改进 路 PC, Va VaV Vo. 现在 就 按照 上 面 讲 的 方法 将 流下 i 
进 成 一 个 更 好 的 流 。 首 先 应 该 定 出 改进 量 a, 先 看 了 RAMEE PH {VV Oa 
Vads VV 
Ci -—- F,-8—2-6 
C4—F4—4—1-3 
Cu 一 下 6 一 7 一 3 一 4 
再 看 P HEARRE P— = (Va Va)) TERUGR9L E. F4-72, 
总 起 来 说 ,a 至 多 取 2. IX FEBE UT DLBE POS BP RU 8] LL B ac So BrHEDD UP ELE S 
xti 5e 38. EE HCIEXEMEP a 之 后 不 变 负 数 。 这 个 改进 过 程 见 图 6-3, 改 进 后 的 流 的 值 
„le 


增加 为 8。 

上 面 我 们 讲 了 在 什么 情况 下 ,一 个 流 可 以 改进 和 如 
条 改进 ,但 还 有 一 点 没有 讲 一 一 怎样 检查 一 个 流 是 不 是 
最 大 的 。 下 面 我 们 给 出 一 个 重要 结论 ， 

设 下 是 网 络 品 的 一 个 流 , 如 果 不 存在 队 V AV, 
FF 可 改进 路 ,那么 下 一定 是 最 大 流 。 至 此 ,我 们 不 难 图 6.3 
得 出 求 最 天 流 的 基本 思路 ; 


取 所 有 Fi 二 0 作为 第 一 个 流 
+ 


现 有 流下 有 可 改进 路 ? 
tX 
RETE F opc 1 EE UE 五 为 最 大 流 


算法 的 关键 和 难点 是 如 何 了 寻 扫 可 改进 路 ,特别 是 对 于 顶点 数 和 弧 数 多 的 网 络 厂 ,寻找 
的 效率 至 关 重 要 。 

是 否 能 找到 一 种 系统 地 寻找 可 改 迁 沾 的 方法 ,这 种 方法 在 存在 可 改进 路 时 能 很 快 地 
将 它 找 出 来 , 当 不 存在 可 改进 路 时 能 很 快 地 告诉 你 “不 用 找 了 ,肯定 不 会 有 "。 下 一 节 讲 的 
标号 法 就 是 这 样 一 种 方法 。 


二 、 和 寻求 最 大 流 的 标号 法 


从 一 个 可 行 流出 发 ( 若 网 络 中 没有 给 定 玉 , 则 可 以 设 玉 是 零 流 ), 进 入 标 叶 过程 和 许 
整 过 程 。 

1 标号 过 程 

在 这 个 过 程 ,网 络 中 的 顶点 或 者 是 标号 点 (又 分 为 已 检查 和 未 检查 两 种 ) ,或 者 是 未 标 
号 点 。 每 个 标 导 点 的 标号 包含 两 个 部 分 . 第 一 标号 指明 它 的 和 标号 从 郧 一 顶点 得 到 ,以 便 找 
出 可 改进 量 ; 第 二 个 标号 是 为 确定 可 改进 量 a 用 的 。 

标号 过 程 开 始 , 总 先 给 V, REl, +o) AE V, 是 已 标号 而 未 检查 的 顶点 ,其 余 都 
是 未 标号 点 。 一 般 , 取 一 个 标号 而 未 检查 的 顶点 Vi, 对 一 切 未 标号 点 了,; 

QD RESO GV pE Farm Cs Vlde V REV LOV RE LOV p= min [LO 5, 
Cy— Fu]. XXX V; 成 为 标号 而 未 检查 的 顶点 。 

C2) XESEO VO E F4. V; SR E C— Vo LO 00 ,这 里 LO 2 — minLE(/ 2, 
Foje RETA V ; 成 为 标 导 而 未 检查 的 顶点 。 

在 六 的 全 部 相 邻 顶点 都 已 标号 后 ,Y, 成 为 标号 而 已 检查 过 的 顶点 。 重 复 上 述 步 骤 ， 
一 县 VV 被 标 上 号 ,表明 得 到 一 条 从 TV, 到 V, 的 可 改进 路 了 , 转 入 调整 过 程 。 

著 所 有 标号 都 已 检查 过 致使 标号 过 程 元 法 继续 时 , 则 算法 结束 ,这 时 的 可 行 流 即 最 大 
n. 

2， 调 整 过 程 


采用 * 倒 向 追踪 ?的 方法 ,从 V. 开始 ,利用 标号 点 的 第 一 个 标号 逐条 弧 地 找 出 可 改进 
路 ,并 以 的 第 二 个 标号 L(V,) 作 为 改进 量 a, 改 进 P 路 上 的 流量 。 

例如 设 V. 的 第 一 个 标号 为 就 (或 一 To SK OALVO GER EZRE CV V0JE P ER 
弧 , 接 下 来 窒 查 的 第 一 个 标号 ,车 为 Vt{ 或 一 V,) 风 提出 CVi,Vi)t 或 相应 的 (VwV;)) ,再 
RE V 的 第 一 个 标号 , 查 到 二, 为止。 这 时 被 找 出 的 统 就 构 戌 了 可 改进 路 了。 令 改 进 量 a 
ELUD. HV, 的 第 二 个 标 导 。 


Fta (V VE P+ 
"Ep (V,V2ocP— 
LF,; Vi VDP 


去 掉 所 有 的 标号 ,对 新 的 可 行 流 F =F ,重新 进入 标号 过 程 ， 
=., 求 最 大 流 的 程序 


program max flow, 


const 
maxi = 30; 
type 
nodetype = record { 可 增 广 轨 的 顶点 类 型 } 
l.p s integer; 1 标号 .检查 标志 i 
end; 
arctype = record ( 网 顶点 类 型 } 
cf: integer ( 容量 ,流量 
end; 
gtype = array [0.. maxn 0.. maxn | of arctype, 1 加 类 型 j 
ltype = array [0.. maxn ] of nodetype; { 可 增 广 轨 类 型 } 
var 
It 1 lype: (HAr 8] 
名 : gtypej { 网 } 
fs&,t 1 integers ( MAK BAA? 
f t text; { 文件 变量 } 


procedure read graph! 
var 
str ! string; 
isj t integer; 
begin 
writeC Graph file = O; | 输入 文件 名 ,并 与 文件 变 晤 连接 } 
readln (str)s 
assign lf ,str) 


reset ({}), 
treadin (fan); ( EXT BUB! 
filichar (gsizeof (g) 0); { 网 络 初始 化 } 
fillehar Clt sizeof Cit? ,0) 3 { 增 广 矩阵 初始 化 } 
fori! =1 tọ n do CEXRÁBEE } 

for j: =[ to n do read (fgl jh c); 
close(f): 
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end; 
function check : integer; { 返回 一 个 已 标号 而 未 检查 的 便 点 序号 } 


VAT 
i * integer; 
begin 
1: =]; 
while (i«z—n) and not Chi]. l« >0) and (lf p—0)) do incCD 
if i7n then check + —0 
eise check : =i 
end; 


function ford(var a : integer) : boolean; 
(Æ Vs Vi AURI YORE TRUE. GER ISI FALSE Fra[ 8D Burg dE SE a) 
var 
iT,m.x © integer; 
begin 
ford : —true; ( 设 无 增 广 轨 } 
fllcharQt,sizeof 12,0); {Hr BUSCO) 


lrs]. l: =s; UM Vs 开始 寻找 增 广 加 } 
repeat 
i * —check; { 寻找 -- 个 已 标号 而 未 检查 的 顶点 序号 1 


if i=0 then exit;  ( E VA eL AREE. WB GER LB fa TRUE } 
for j: =1 to n do 
if (t[3].12 9? and Cg]. c0 or iji] c9) 
{ 寻找 所 有 与 ij 连接 . 甩 未 标号 的 顶点 NC UID RC RI eX RI SLE A } 
then begin 
if lij]. f glide) then tj]. i =i; 
if (g[j.i]. £270) then it[j]. i: — —i 
end; o. 
ilp: —1£4TBü&R ip T HOSUELA ToO EMA ERG 
until Utt]. «2700, { 循环 ,直至 + 顶点 标 导 为 止 } 
m: 一 tia: —maxint, ( A t MAAM BARDHE. 
repeat ( 求 a 二 min[ 所 有 前 向 弛 的 CG. D FG ,所 有 后 向 强 的 FG. 
j? =m;m : =abs (lt[}],1); 
if 1(j). 10 then x : —g[j,m].f—0; 
if h]. 1270 then x : -g[m,jJ. c —gDm.3]. f; 
if a™>x then a 1 =x 
until mzs; { E( SE GERE s 顶点 为 止 了 
ford : —false ( 返回 可 增 广 急 存 在 标志 FALSE } 


end, 


procedure fullkerson(a + integer); 
var 
mj integer; 
begin 
m: —t; { 从 t 顶 点 出 发 , 沿 增 广 轨 修 正 流量 } 
repeat 
j: —mim : =aba ht G]. D; 
if Lj]. 1<0 then g.m]. f: —g[ im]. £—2; 
if Ej]. 1270 then glm,;]. £5 —g[m;jT. f—-a 
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until m=s 
end; 
procedure answers ( TAMAMI HE } 
vVar 
isj t Integer; 
begin 
fori —1 to n do 
lor j: —1 to n do 
if gii] £720 then writeln(i,' ——— —' js" " glisi]. £) 
end ; 
procedure proceed 
var 
del ! integer; 
succesa 1 boolean; 
begin 
s: —I;t! =n; | 设置 源 点 和 汇 点 序号 } 
repeat 
success + —ford(deD , { 村 找 可 增 广 轨 和 订 改 进 量 del } 
if success then answer ( 若 可 增 广 辆 不 存在 ,打印 最 大 流 } 
else fulkerson (del) { 否则 沿 增 广 机 修正 流量 》 


until success 
end; 
begin 
read .graph, ( 输入 网 } 


proceed { 求 最 大 流 } 
end. 


6.2 求 容量 有 上 下 界 的 网 络 的 最 大 流 和 最 小 流 


6.2.1 求 容量 有 上 下 界 的 网 络 的 最 大 流 
一 、 问题 及 其 求法 


6.1 节 讨 论 了 网 络 的 最 大 流 间 题 。 这 种 网 络 的 每 一 条 弧 。 对 应 了 一 个 弧 容 量 C(e) 之 
0.。 现 在 ,我 们 将 网 络 结构 再 修改 一 下 ,每 条 驱 e 对 应 两 个 数字 Ble) 和 Cle) PIRRE 
量 的 上 和 界 和 下 界 , 那 么 如 何 求 满足 下 列 条 件 的 最 大 流 : 

1. BSF ESCE) 

2. 9) Fe- 9, FOs — (VsesD 


«€ fcV ) «€ ac V) 


其 中 , x(V) 一 一 以 Y ARIS, Q4, 25,, 
BOD——W V ARHAR. 
显然 ,6. 1 节 例 举 的 网 络 结构 是 有 上 下 界 的 网 络 的 一 种 特例 ， 图 e 
即 Ble) 一 0. 当 Ble)>0 时 ,这 种 有 上 下 界 的 网 络 就 不 一 定 存在 流 
了 .人 钠 如 ,图 6-4 所 示 的 网 络 ,部 上 的 第 1 个 数字 为 Ble) 的 值 ,第 2 个 数字 为 Cle) 的 值 .由 


LET E 


于 0 委 忆 < 委 1,2 委 RU < 委 3, 对 于 顶点 2 来 讲 , 忆 .一 已 . 夭 0, 所 以 该 网 络 不 存在 流 。 

那么 如 何 判 斯 一 个 有 上 下 界 的 网 络 N 有 可 行 流 呢 ? 我 们 很 容易 想到 一 种 思路 一 一 将 
容量 有 上 下 界 的 N 网 转换 成 6. 1 节 所 述 的 “每 条 弧 仅 对 应 一 个 容量 C(e) 之 0? 的 附加 网 
如 ,然后 用 标号 法 对 其 求 最 大 流 , 根 据 求 解 结果 判断 N 网 是 否 有 可 行 流 下。 具体 的 转换 方 
nt. 

1. SUB Inm UR 30 65 PROVPH ID UR ez 称 为 附加 汇 ， 

2， 对 原 网 络 N BLUT TRLLU 1 — 2C e= ,这 条 弧 的 容量 为 所 有 以 己 AER 
DUCES adc M Ce) = 2, Be 


3. 对 原 网 络 N HRAMA U. t AR ECL em sU LIXCARCILSI EO BULL U 为 头 的 
MARETE ZMT 一 PI 

4. 原 网 络 N I SEARNUÉE C. 仍 保 留 , 弧 容量 Ce) 修正 为 Cle) 一 Ble)， 

5. BEP este 二 tt。e 的 容量 Cle) 二 oo0,e 的 容量 Cle') 二 o0。 

用 6.1 节 所 述 的 办 法 求 附加 网 N 的 最 大 流 , 若 结果 能 使 流出 5 的 一 切 弧 丝 满载 ( 即 s 
出 发 的 所 有 骂 e,Cle) 二 FCe)), 则 NN 网 有 可 行 流 FGO S FGO-EBGO, 838 N ALAT 
Wu. 

若 方 网 的 最 大 流 满 足 上 述 条 件 , 我 们 则 可 以 再 使 用 6. 1 节 所 述 的 标号 法 ,将 可 行 流 
FAK RARE N 网 的 最 大 流 。 

例如 ,图 6-5 为 一 个 容量 有 上 下 界 的 网 
络 N 弧 上 界 的 教 第 1 个 是 下 (e), 第 2 个 是 
Ce). 

EHR N, BRYER N 网 上 的 最 
大 流下 ( 见 图 6-6). 

弧 上 的 第 1 XC CCO. 8S 2 CF 
ON:ET PESCE T IESU nd: 6-5 
的 网 N 中 有 可 行 流 FUGO AF GO TBGO. TB 
6-7 TE FER N 网 的 可 行 流 , 就 上 的 3 7-3 
依次 为 Bie), Cle), Fie), 

用 6.1 节 所 述 的 标号 法 将 图 6-7 中 的 可 
行 流 放大 ,得 最 大 流 如 图 6-8。 

最 大 流 的 流量 =10。 


Z, 求 容量 有 上 下 界 的 网 络 的 最 大 流 的 程序 


program max flow. for up.-and down; 
{ 求 容量 有 上 下 界 的 网 络 的 最 大 流 } 


const 
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maxn = 30; 
type 
nodetype = record { 增 广 轴 的 顶点 类 型 : } 
lsp integer: { 标号 .检查 标志 } 
end; 
aretype = record (METAKA: ARL. TE ME) 
bef rz integer 
end; 
gtype = array [1l..maxn.l..mexn] of arctype, 网 类 型 } 
ltype = array [1.. maxa] of nodetype,; CRAN } 
YOAT 
lt : ltype: iH 
ggi + gtype; {网 } 
n«4Sst ! integer; AAR agg X } 
H 2 text; { 文件 变量 } 


procedure read. graph; 
var 
str t string; 
1j * integer; 
begin 
wiite('Graph file = 0; — CEA X (EAE IS x EIE RGEIE } 


readln (str); 


assign(1 str); 
reset (f) ; 
readin (f ,n) : { 读 入 顶点 数 } 


fillchar Cg ,sizeof (g) .0): (tiom nip Sig ide: 
fillehar(lt.sizeof(1t).00, +{ 该 人 初始 网 } 
for i: =2 to n+1 do 
for j : =2 to n+1 do read tf. g[ 5,3]. b.giisid e: 
close (D; 
endi 


function check + integer; 返回 一 个 已 标号 而 未 检查 的 质点 序 导 i} 
var 
i * integer: 
begin 
EX IT 
while (i —n) and not COtB3].1«2270) and (tfi). p=0 do incli); 
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if i>a then check s =p 
else check : =; 
ends 


function ford(var a : integer) * boolean; 
{ 若 增 广 较 不 存在 返回 TRUE ,否则 返回 FALSE 和 可 改 量 a) 
var 
[jim x 1 Integer; 
begin 
ford : —true; { EH Sir ZEE) 
fülchar (lt sizeof ilt) ,00; (77 RUE 1 
k[s;.1: —1; (As 顶点 开始 标志 增 广 执 } 
repeat 
it —check; 
{ 搜索 一 个 已 标号 而 未 检查 的 顶点 序号 ,车 该 项 点 不 存在 返回 true 1 
if i—0 then exit; 
for j* —s to n do ] 
if dt{[j].1=0) and (Gg[i,j]. e 0) or (3.1. e 70») 


{ 搜 索 所 有 与 1 祖 连 约 未 标号 顶点 REC 2 RECITAL ES Pa e sd 


then begin 
if cg[i,j]. f«gli loc) then Itfj1.1 13 
if Gro. £g si]. b) then kOJ. t: ——i 


end; 
lid. p: —1 ES 顶点 已 检查 标志 } 
until citit]. 177-0); { 直至 t RACAL ) 
m: —t;a! —maxint; At MAMRE 3 5. a). 


repeat 
l j* —m;m: —aba(H jj. D, 
itO], 1&0 then x : 2 g(j,m]1. f—gLiml. b; 
i hj]. 1270 then x: -g[ mil. c— gmi]. f: 
if aZ»x then at =x 
until m-s; . 
ford + —false ( 3E fa RH I HUE E GS 


end: 


procedure fulkersont(a : integer); { 修正 增 广 轨 上 的 流量 } 
var 
m.) : integer; 
begit 
m: =t; { At RAHE } 
repeat 
jt —mim t 一 absdit[].]); 
i£ [3]. 10 then gjm]. £: —g[i,m].f£—a; 
if It]. 1270 then g[m.j]. f : 2g[m.jl. f--a 
unti] m-—s ( 直 座 倒 推 至 s 项 点 为 让 } 


end; 


procedure answer; | 打印 各 弧 上 的 最 大 撤 量 } 


var 
i j : Integer; 
begin 


. 7l- 


fori: =2 to n do 
for j: -2 to n do 
if g[ i.i]. £270 then writeln(i—1,' —— — —' ,3—1,' "gli D 


end; 


procedure proceed | 


725 


var 


1,]»x.del : integer; 
success + boolean; 


begin 


81 —ljnc(n,2);t : =n; ( 增加 一 个 附 可 源 s=1 和 一 个 附加 汇 1+ 一 an 十 2 } 


gl —gilillehar(g,sizeof(g).0), ( 暂 存 初始 网 , 耕 加 两 初始 化 } 
fori: 一 2 to n—1 do 
for j: 一 2 to n—1 do 


Jn—3 3138 si = e,c' (e) = J] bi) 


( ee fi» 
{ 对 初始 阿 的 第 一 个 顶点 i 


i 
i 
begin 
glssi].c + =g[s,i].c+g10+i]. b; 
glist] e: —glitled-gi[i,jlb 
end; 
fori: =2 to n—1 do ( 原 网 络 的 过 很 留 ,c (e) —c(e —- bGe) .b'(e)—0 1 
for j: =2 to n—1 do g[isjj.c' —gllijj).e—glliii]. bi 
g[2a 一 1].c =maxint;g[n—1,2]. c : = maxint; 
{ 增 两 条 边 el 一 stye2 一 taycfel) 一 C(e2) 一 co(eTI) 一 Bfe2) 一 0 } 
repeat 
success : —Íord(del), ( 寻找 新 疝 中 的 可 增 广 轨 和 改进 量 del ) 
if not success then fulkerson(deD ( 若 证 增 广 轨 存在 , 则 修正 流 基 } 
until success; ( 直 蔡 无 增 广 轨 存 在 .最 太 流 求 出 } 
fori: =2 to n—1 do { R f(e) 216) -b GO ,成 为 初始 网 的 一 个 可 行 流 } 
for j 一 2 to n—1 do 
begin 
g1Li 1.1 : —g[i-3l fo-glli.i). b: 
end; 
st —2;n: —n—]lit: =n; 
{ 顶点 2 作为 汰 点 ,顶点 nl ACA ARE a A DU } 
g: —gli { 恢复 初始 网 7 
名 [at 二 Dygftrsj.f: 一 0; (撤去 两 条 边 人 ,tttvs) 两 条 边 的 入 量 } 
repent { 将 原 网 的 可 行 流放 大 ,得 最 大 流 》 
success : =ford idel}; 
if success then answer 


else fulkerson (del? 


ORAR 


[加 一 条 强 边 i 二 eyc'() 一 $e) FO) 


until success 
end; 
begin 
read.graph; {输入 容量 有 上 下 界 的 网 络 ) 
proceed { 计算 并 输出 最 大 流 } 


end. 


6.2.2 求 容量 有 上 下 界 的 网 络 的 最 小 流 
一 , 问题 及 其 算法 


对 于 一 个 容量 有 上 下 界 的 网 络 N ,我 们 已 经 有 了 对 其 求 最 大 流 的 算法 。 因 此 ,我 们 不 
难得 出 求 N 网 的 最 小 流 的 算法 : 
按 上 一 节 所 述 的 办 法 构造 附加 网 N 
! 
用 标号 法 求 叉 Bii Bed 
WHERE R-E? —— — —3À 
4Y 
Rih N 网 和 可 行 流 
FG) -FG)-- Bie) 
" N pl CRX BE 
鲍 向 求解 


以 z 为 源 点 ,s 为 汇 点 ,用 标号 法 放大 可 行 流 ,最 终 求 出 的 最 大 流 即 为 从 s 到 上 的 最 
小 流 。 


Z., 求 容量 有 上 下 界 的 网 络 的 最 小 流 的 程序 


program min. flow. for-up-and_-downe 


56-2 f8 Ie] T o RCUR 


N 


{ 求 容 量 有 上 下 界 的 网 络 的 最 小 流 } 
const 
maxn 一 304 
type 
nodetype = record (I IAM 
l,p t integer; { 标号 ,检查 标志 } 
end; 
arctype = record { 隔 的 顶点 类 型 : } 
b.c. integer { 容量 上 下 界 , 流 量 } 
end; 
gtype = array [1.. maxn,l..maxn]of arctype, 1{ MÆ% } 
ltype = array [1. . maxa] of nodetypei { H REA } 
var 
lt 1 ltypes {H } 
ggl t gtype; a 
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ngst s intepger! 
Í 1 text; 


procedure read- graph 

vat 
atr ! string: 
i.j! integer, 

begin 
write('Graph file = '); 
readin(str) ; 
assign (f ,atr) ; 
reset (f); 
readintf n) ; 
lillehar (g ,sizeof(g) ,0) + 
filtehartlt ,sizeof (1t) ,0) 


HAR AEA 
{ 文件 变量 } 


{ 读 和 文件 名 并 与 文件 变量 连接 ) 


EAKAS% } 
{ 网 络 和 可 增 广 轨 初始 化 } 
{ 读 入 初始 网 } 


for i 1 —2 to n+1 do 
for j! =2 to n+} do read(f.g[i.j]. bog[i.3]. s 


close (£) ; 
end; 
Íunction check + integer; { 返回 一 个 已 标号 而 未 检查 的 便 点 序号 1} 
var 
i * integer, 
begin 
it =s; 


while (i =n) and not (Ct[1]. 170) and Ct[i). p=0)) do incti?; 
if i79n then : integer) : boolean; 
{ 车 增 广 轨 不 存在 返回 TRUE ,否则 返回 FALSE 和 可 改 量 a } 
var 
iyjvinyx ! integer, 
begin 

ford : true, { 属 增 广 罗 不 存在 标志 } 
fillchar(1t,sizeof(112,0), GR Mules } 
kis]. l: —1: 1 从 s 顶 点 开始 标志 增 广 轨 } 
repeat 

is —check; 

{ 搜索 一 个 已 标号 而 未 检查 的 顶点 序号 , 若 该 项 点 不 存在 返 而 true } 

if i=0 then exit; 

for js —s to n do 

it dt]. 1— 0? and ((g[i.i]. e 0) or (gij i]. ec) 
EE DLESEO pi RIGCRUR E QAMPEUDL CAP tr 
then begin 
i£ GD,i]. E gLi gj). e? chen It[j].1 : =i; 
if Cg[ isi] fA g[j.il. b) then it[ 门 ,1 : ——i 
end, 

k[1l.p: —1 
until (le[t]. 1-7 05, 
m: —t;a t =maxint; 


{i 顶点 已 检查 标志 } 
{ 直至 + 顶点 已 标号 为 止 } 
( 其 + 顶点 情 锥 , 求 可 改进 量 a } 
repeat 
j: =mym : —abs(lt[j]. D; 
if 1t[3], 1«20 then x : —g[j:m]. £—g[ jm]. b; 
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if tG]. 1270 then x : =gfm,j].c—glm,j]. f: 
if ax then a : =x 

until ms; 

ford | —false ( 返回 可 增 广 轨 存在 标志 } 


end: 


procedure fulkerson(a * integer); ( 修正 增 广 轨 上 的 流量 } 


var 
m.j integer; 
begin 
m: =t; ( At 顶点 倒 推 } 
repeat 
j: 2mim : —abs(lt[j]. D; 
if hO]. £0 then g[ jm]. f * 2g[jm]. £É—2a; 
if 1t[j]. 1770 then g[m jl. f : —g[m.j]. {+a 
until m—s ( 例 推 直 至 s 顶点 为 止 } 


end; 


procedure answer; ( TED 91 E RS Nea } 


var 
i,j ! Integer; 
begin 
for i* =2 to n do 
for j: =2 to n do 
if gi .j]. £770 then writeln(i —1,' —— -—- —'.j—1.' '.gii.i].O 
end; 


procedure proceed , 
var 
i» jix del : integer, 
success : boolean; 
begin 
s: —ljine(n,2),t: =n; { WWA RR s—1 和 一 个 附加 汇 (922! 
gl' 一 gyfillchar(g ,sizeof(g),0): { 暂 存 初始 网 ,附加 网 初始 化 } 


for i * =2 to n—1 do 
Tor js —2 to n—1 do 


' 加 一 条 就 边 对 一 evc' (e) — 2 be) b'e) 20] 
1 «eaa? 
) 
{ 对 初始 网 的 第 一 个 顶点 i , 
jn — 39.32 it = esc'(e) — Db) b'G)-—0! 
tk «ci? 
begin 


glssi]. e : —g[5.i]. ec- gil pil. b: 
gli.tl.c: -glictlc-cgl(ijlb 
end; 
fori: 二 2 to n—1 do ( 原 网 络 的 边 保 留 ,c' (e)=cie)— ble), b (0 —0 ) 
for j: 一 2 to n—1 do g[i.j].e : —gl[oi].c— glii.i]l. br 


gl2;n—1].c ! —maxint;g[n 1,2. c * —maxint; 
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{ 增 两 条 边 el—st.e2—ts.c(el) -c(e2) —oo,b(e1) —b(e2) —0 } 
repeat 
success : 一 fordfdet)5 | 寻找 新 阿 中 的 可 增 广 轨 和 改进 量 del } 
if not success then fulkerson(del) ( 若 增 广 轨 存在 , 则 修正 流量 } 
until success; { 直至 无 增 广 就 存 在 .最 大 流 求 出 } 
for is —2 ta n—1 do ( 求 ffe) 一 ffe) 十 he) 成 为 初始 网 的 一 个 可 行 流 } 


for j * 一 2 to n—1 do 

begin 

gi[i-1]. f: —gi.i] EF gl1[i-i]. b; 
end; 


t! —2,n3 —n—]14s: =n; 


{ 顶点 n—1 作为 淹 点 ,顶点 2 为 汇 点 ,相对 初始 网 来 说 } 


{ 求 t+ 至 的 最 大 流 , 即 求 s 至 + 的 最 小 流 } 
:二 gl; { 恢复 初始 网 } 
g[sstj.f: —0;g[tis]. £* —0; 
repeat 

success : =ford (del); 

if success then answer 

else fulkerson(del) 

until success 


end; 
begin 
E 输入 容量 有 上 下 界 的 阿 络 } 
{ 计算 并 输出 最 小 流 } 


read - graph; 
proceed 


end. 


6. 3 


i TUE DER GIO ,lt,s) 两 条 边 的 流量 } 
{ 特 原 网 的 可 行 流放 大 ,得 最 大 流 } 


最 小 费用 最 大 流 问题 


6. 1 节 讨 论 了 寻找 网 络 中 的 最 大 流 问题 。 在 实际 生活 中 ,涉及 “ 流 ” 的 问题 时 ,人 们 考 
虑 的 还 不 只 是 流量 ,而 且 还 有 “费用 ”的 因素 。 例 如 ,图 6-9 是 一 个 公路 网 ,V, 是 仓库 乙 所 
在 地 , 即 物资 的 起 点 ,V, 是 甲 地 , 即 物资 的 终点 。 另 外 ,每 一 条 弧 旁 都 写 了 两 个 数字 。 第 1 
个 数字 表示 某 一 时 间 里 通过 这 段 公 路 的 最 多 吨 数 ,第 2 个 数字 表示 每 吨 物 资 通过 该 公路 


的 费用 。 现 在 的 问题 是 怎样 安排 运输 才能 既 使 得 从 起 点 
V. 运 到 终点 V, 的 物资 最 多 ,又 使 得 总 的 运输 费用 最 少 ? 
显然 图 6-9 是 一 个 网 络 。 这 个 网 络 的 每 一 条 弧 《V,;， 
VOIR E IP] ERE Ci 外 ,还 给 了 一 个 单位 流量 费用 Bi 之 
0。 上 述 问题 的 数学 模型 即 要 求 一 个 最 大 流 户 ,使 流 的 总 
输送 费用 
3) BF, 


BRF) = 取 极 小 值 
. (VV EA 
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V OD V, 


(10,4) A27 
V, 
NE 
B EV 


V; (10,3) Vs 


图 o9 GRAmMECEECEHR, 
单位 流量 费用 )) 


这 即 所 谓 的 最 小 费用 最 大 流 问 题 。 
一 、 最 小 费用 最 大 流 的 算法 


从 6.1 节 可 知 , 寻 找 最 大 流 的 方法 是 从 某 个 可 行 流出 发 ,找到 关于 这 个 流 的 一 条 可 改 
进 路 了 P, 沿 着 卫 调整 下 ,对 新 的 可 行 流 试图 寻找 关于 它 的 可 改进 路 ,如 此 反复 直至 求 得 最 
大 流 。 现在 要 寻求 最 小 费用 的 最 大 流 ,我 们 首先 考察 一 下 , 当 沿 着 一 条 关于 可 行 流 玉 的 可 
改进 路 ,以 a—1 调整 下 ,得 到 新 的 可 行 流 F (显然 VCF') 二 VF 十 1) ,BCF') 比 BO» 
增加 多 少 ? 

不 难看 出 2 
B(QP) — BG)- [5] Bj (Fl — F4) — 之 By» (F4 — Fi)] 


= $ B,— M B; 
我 们 把 之 B, 一 之 Bi 称 为 这 条 可 行路 卫 的 “费用 ”。 


显然 ,车 下 是 流量 为 VLF) 的 所 有 可 行 流 中 费用 最 小 者 ,而 P 是 关于 下 的 所 有 可 改 
进 路 中 费用 最 小 的 可 改进 路 , 郑 么 洪 PP 去 调整 下 ,得 到 的 可 行 流 F' ,有 即 流 最 为 VCF') 的 所 
有 可 改进 流 中 的 最 小 费用 流 . 这 样 , 当 FF 是 最 大 流 时 , 它 也 就 是 我 们 所 要 求 的 最 小 费用 最 
大 流 了 ， 

注意 ,由 于 By 之 0, 所 以 下 =0 必 是 流量 为 0 的 最 小 费用 浅 。 这 样 , 总 可 以 从 丈 一 0 开 
始 。 一 般 , 设 已 知 正 是 流量 VCF) 的 最 小 费用 流 , 余 下 的 问题 是 如 何 去 寻 求 关 于 的 最 小 
费用 可 改进 路 。 为 此 我 们 构造 一 个 赋 祝 有 向 图 W CF , 它 的 顶点 是 说 网 络 万 的 顶点 ,而 把 
D pf S —ÓRSLCV V DEBIT 27 8D CS L CVV HIC, V. gg CW GEO PREX 
Wau: 


他 d; FG Ci 

Wiz 

T co m Fy = Ca 
十 co zyF,0 


(长 度 为 oo 的 可 以 从 W (9 中 略 去 ) 

于 是 在 网 络 中 寻求 关于 下 的 最 小 费用 可 改进 路 ,就 等 价 于 在 赋 权 有 向 图 WW(F) 中 ,寻求 从 
V, 到 Y, 的 最 短路 。 因 此 有 如 下 算法 : 

开始 取 F(00 一 0, 一 般若 在 第 & 一 1 步 得 到 最 小 费用 流 RtE 一 1), 刚 构造 赋 权 有 向 图 
W(G(—1D ,在 色 (FGE 一 1)) 中 ,寻求 从 T 8] V. 的 最 短路 。 若 不 存在 最 短路 ( 即 最 短路 
权 是 十 吕 ), 则 请 (8 一 1) 即 最 小 费用 最 大 流 ;车 存在 最 短路 , 则 在 原 网 络 D 中 得 到 相应 的 
可 改进 路 PEU GER PP 上 对 (一 1) 进 行 调整 ; 

a = min[min (C, — Fk — 1», min Fœ — 15] 


F4 — Doa (V,,V)€P- 
F; (k) = fra —1)—a VaV € P -— 
Folk un D m & P 
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得 到 新 的 可 行 流 F) ,再 对 FGO SA EXEGESRE, 
例如 , 求 图 6-9 HERRAR. MSPA GS BS. 
(D HR FCO —0 为 初始 可 行 流 ; 


(2) HERBA KEA W CF CODD ,并 求 出 从 V, 到 V. P] RR FERE CVV Vo V, HER 6- 
10a) GXBEE BD RA EO s 


(3) 在 原 网 络 4 中 ,与 这 条 最 短路 相应 的 可 改进 流 为 已 一 (7 SVnVoe Vo: 

(4) 在 PP 上 进行 调整 ,a 二 5, 得 (1)( 图 6-100000 EIL EXE EGET IF OD, F (2, 
FC3) ,FL4) 的 流量 依 深 为 5,7,10,11( 见 图 6-1000 (d), (Pa 构造 相应 的 赋 权 有 向 
ED WEO WEO WEG, WEU COLE 6-221000. GO (9, G2). 


注意 到 WCFC4)) 中 已 不 存在 从 VV, 到 VV 的 最 短路 ,所 以 (4) 为 最 小 费用 最 大 流 。 


vis Vi 


SEN 


Fa 
上 (TYCEKE) 一 5 weran 
(5) 


EU 


FG), D 10 


* 
3 2 4 3 3 
WRCa)) F(4),VCGFGDO lH WFD 
Gg) (Rh) a) 


图 6-10 


二 、 最 小 费用 最 大 流 的 程序 
program max. flow, 


type arctype— record (MEE d 285786 : } 
max + integer; (A) 
act : integer, (Jk ME) 
end; 
settype —set of byte; 
var 
nl,node t array [1.. 20] of integer; — 《辅助 变量 ,最 佳 路 径 序列 } 
arc t array[ 1. .20,1.. 20 jof arctypes {网 络 } 
wb : array[1. . 20,1. . 20]of integers. 【最 小 费用 和 单位 费用 } 
success ? boolean, { 威 功 标志 》 
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start ,ends,a ,n min : integer; 


(ES TE AR Lic NE S ec Eti) 


procedure getting - path (s tot : integer;m + settype): 
{ 求 从 start 至 enda 的 最 佳 路 径 Oo RETE ETE LUE min — maxint! 
{8 一 竺 扩展 结 点 ,tot 一 一 -当前 路 径 代 价 ,m 一 一 当前 最 佳 路 径 结 点 集合 } 
var 
i * integer; 
begin 
if sends 
then begin 
if tot-Cmin 
then begin 
min : 一 toty node : —n1 
end 
end 
else begin 
for i 1 =1 to n do 
if (w[s,i]<>maxint) and not (i in m) 
then begin 
if arcfs,i]. actCarc[ 5,1]. max then nl[ij: =s; 
if erc[ 1.5]. act 70 then nl[1]* = —5: 
if i—ends then nl[i] ! =s; 
getting path(,tot--w[s.i].m-4-[i]) 
end 
end 


endi 


function ford(var a t integer? + boolean; 
LE w AM start Z ends H Ex (ERE TÉ DUE E true ;否则 进行 标号 过 程 并 返回 false) 
{ 和 改进 量 a} 
var 
i,]; m.s : integer; 
begin 
ford t = false; 
fori: =1 to n do iw 图 初始 化 } 
for j  —1to n do w[1,j] : —maxint; 
fori: =1 to n do {根据 当前 可 行 流量 ,给 w 图 赋 权 } 
for j : —1 to n do 
with arc[i.j] do 
if maxz-0 then 


begin 
if aermax then wij]: —b[i.jl; 
if act max then wli.j] ! —maxint; 
if act>0 then w[j,i]? — —b[iil: 
if act —O then w[j;i] ! —maxinr: 
end ; {with} 


nl[start] : 一 statrti{ 初始 结 点 进 人 增 广 链 } 

min t —maxint; { 最 佳 路 径 代 价 初始 化 } 
getting path(start ,O. [start D; GR EE [ERR ER ! 

if min maxint (EARE. RHR H1) 
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then begin 
ford : —true;exit 
end; 

mt =ends;a : —maxint; {从 vn 开始 } 

repeat (对 最 佳 路 径 表 示 的 增 广 链 求 改进 最 a} 
j? —^mim ? —abs(node[1]); 
if node[j]<0 then s + —azc[j. m ]. max; 
if node[j]>0 then s :+ —are[m,j]. max —are[ mj]. act: 
if as then a : =s; 

until m-—start s 

end; (ford) 


procedure fulkerson(a : integer)tt 对 增 广 链 进行 调整 } 
var 
i. m.] : integer; 
begin 
m: —ends; 
repeat 
j* =m;m : —abstnode[j]?: 
if node[5]«70 then arc[ jm ]. aet : —arc[j«m J. act —a s CC HEJE [6] CO 
if node[31770 then atc[ m,jl. act * —arcm.,j. act -a C HE RIT Fg SL o 
until m start ; 
end , (fulkerson) 


procedure answer, 1 打印 器 小 费用 最 大 流 和 总 输 谈 费用 } 
var 
ivjvtot : integer; 
begin 
tot ! =03 
fori: =1 to n do 
for j: =1 to n do 
if arc[1,j]. max >0 
then begin 
writeln (i,' 一 一 一 一 /yj 的 流量 和 费用 ' ,arc[i j].act ", 
blii] "Sb * arc[i,j], aet; 
tot ? —totd-b[i,j] * arc[i, i] act 
endi 
writela('* Tot — ' tot) 
end; (answer) 


procedure init; 《数据 输入 } 

var 
stim + integer; 

begin 
fillehar Carc sizeof (are) 10); 
write(' 结 点 数 : ') readin(n) 
write CE =) yreadin(Cm)y 
write C 初始 结 点 5 站 3readln(start) 
writeC Z£ jp £8: readinCends); 
for i: =} to m do 

begin 


s 80 * 


repeat 


write C E uis ZR EB COR ODORE, 


readin(s t); 
until (s in [1.. n]jand <t in [1.. n Dand (s«10:; 


write C 58 1. 2€ 3E 8] CES ORI CHR FE" P areadinGarc[s t j. max b[s.t 2: 
end; (for) 
end; (init) 


begin 
init; {输入 全 上 下 界 和 费用 的 网 络 } 
repeat {重复 标号 .调整 过 程 , 直 茎 求 出 最 小 费用 最 大 流 } 


success t —ford(s); 
if not success then fulkerson(a?; 
until (success) ; 


answer; GTERM IS EB AGI 


end. (main) 


=, 求 最 小 费用 最 大 流 的 一 个 实例 一 一 最 佳 航空 路 线 问题 
1， 问 题 及 其 分 析 
你 在 加 拿 大 航空 公司 组 织 的 一 次 竞赛 中 获奖 ,奖品 是 一 张 免费 机 票 ,可 在 如 拿 大 旅 
行 ,从 最 西 的 一 个 城市 出 发 ,单方 向 从 西向 东经 车 干 城市 到 达 最 后 一 个 城市 (必须 到 达 最 
东 的 城市 ), 然 后 再 单方 向 从 东 向 西 飞 回 起 点 (可 途经 若干 城市 ) . 除 起 点 城市 外 ,任何 城市 
只 能 访问 一 次 。 超 点 城市 被 访问 二 次 :出 发 一 次 ,返回 一 次 。 除 指定 的 航线 外 ,不 允许 乘 其 
它 航 线 ,也 不 允许 使 用 其 他 交通 工具 。 求 解 的 问题 是 :给 定 城 市 表 列 及 两 城市 之 间 的 直通 
航线 表 列 ,请 找 出 一 条 旅行 航线 ,在 满足 上 述 限 制 条 件 下 ,使 访问 的 城市 尽 可 能 多 。 
多 个 不 同 的 输入 数据 组 写 在 一 个 名 为 C: NIOINITIN. DAT 的 ASCH 文件 中 ,文件 
中 每 一 数据 组 的 格式 说 明 如 下 ; 
， 数据 组 的 第 一 行 是 x 和 V; 
an 代表 可 以 被 访问 的 城市 数 ,= EEE 100; 
V 民 表 下 面 要 列 出 的 直 飞 航线 数 ,VV 是 正 整 数 。 
。 以 下 x 行 中 每 一 行 是 一 个 城市 名 ,可 葬 飞 机 访问 这 些 城市 。 城市 名 出 现 的 顺序 是 ， 
从 西向 东 。 也 就 是 说 , 设 i,j 代表 城市 表 列 中 城市 出 现 的 顺序 , 当 1 ; 时 ,表示 城 i 在 城 j 
的 东边 (这 里 保证 不 会 有 两 个 城市 在 同一 经 线 上 )， 
城市 名 是 一 个 长 度 不 超过 15 的 字符 串 , 囊 中 的 字符 可 以 是 字母 或 阿拉 伯 数 字 。 
例如 ;AGR34 或 BEL4 
， 接 下 来 的 V 行 中 ,每 行 有 两 个 城市 名 ,中间 用 空格 隔 开 ,如 下 所 示 : 
Cityl City2 
表示 从 Cityl 到 City2 有 一 条 直通 航线 ,从 Cityl 到 City2 也 有 一 条 直通 路 线 。 
， 不 同 的 输入 数据 组 之 间 被 空 行 隔 开 (参看 例子 ) ,最 后 一 个 数据 组 之 后 没有 空 行 。 
下 面 的 例子 放 在 文件 C:， NIOINITIN. DAT 中 : 


8 9 
Vancouver 


al* 


Yellowknife 
Edmonton 
Calgaty 
Winnipeg 
Toronto 
Montreal 
Halifax 
Vancouver 
Vancouver 
Calgary 
Winnipeg 
Toronto 
Montreal 
Edmonton 
Edmonton 
Edmonton 


Edmonton 
Calgary 
Winnipeg 
Toronto 
Halifax 
Halifax 
Montreal 
Yellowknife 
Calgary 


假定 输入 数据 完全 正确 ,不 必 对 输入 数据 进行 检查 。 
对 于 每 一 组 输入 数据 ,其 结果 都 必须 写 在 名 为 C : NOINITIN. SOL 的 ASCH 文件 


中 ,其 格式 为 : 


”第 1 行 是 输入 数据 中 给 出 的 城市 数 ， 

"第 2 行 是 你 所 建立 的 旅行 路 线 中 所 访问 的 城市 总 数 Mi 

， 接 下 来 的 (M 十 1) 行 是 你 的 旅行 路 线 中 的 城市 名 ,每 行 写 一 个 城市 名 。 首先 是 出 发 
城市 名 ,然后 按 访 问 顺序 列 出 其 它 城市 名 。 注 意 : 最 后 一 行 (终点 城市 ) 的 城市 名 必须 是 出 


发 城市 名 。 


”如 题目 无 解 , 输 出 数据 格式 为 : 
第 1 行 是 输入 数据 中 给 出 的 城市 数 ; 
第 2 行 写 :“NO SOLUTION", 

上 述 例子 的 解 如 下 所 示 : 


ITIN, SOL 
8 
7 
Vancouver 
Edmonton 


825 


Montreal 
Halifax 
Toronto 
Winnipeg 
Calgary 
Vanouver 


5 
NO SOLUTION. 
Vrat m mm cite Ct NOINDDD. PAS 


上 述 题 目 可 以 用 搜索 算法 ,但 问题 是 ,一 旦 城市 数 或 直通 航线 数 多 时 便 很 难 求 出 解 。 
现在 有 了 求 最 小 费用 最 大 流 的 算法 基础 ,就 可 以 迅速 地 求 得 这 条 最 佳 的 旅行 路 线 。 

首先 , 按 下 述 原 则 构造 一 个 新 的 网 络 n: 

OD 每 个 城市 i 拆 成 两 个 顶点 i 和 站 ,并 在 两 个 顶点 之 间 连 接 一 羔 由 i 至 i' 的 有 向 弧 ， 
缉 的 容量 为 1 ,表示 该 城市 最 多 只 能 访问 一 次 。 为 了 使 该 城市 尽 可 能 被 访问 ,单位 流量 费 
用 设 为 0; 

(2) 着 城市 i 到 城市 ;有 直通 航线 过 说 , 则 在 项 点 让 与 项 点 7 之 间 连 接 一 条 弧 , 方 向 
由 顶点 六 至 顶 点 j。 强 的 容量 为 1, 表示 这 条 航线 最 多 只 能 通过 一 次 。 单位 流量 费用 设 j 一 
i 十 1; 即 城市 j 位 于 城市 i 的 东 面 ,中 间 相 隔 的 城市 数 为 j 一 i 十 1; 

(3) 顶点 1 与 顶点 2 之 间 的 弧 容量 改 为 2, 表示 最 西端 的 城市 1 被 访问 两 次 。 顶 点 
与 顶点 ww' 的 弛 容 量 也 改 为 2, 因为 如 果 往 返航 线 分 作 两 条 路 线 考 虚 的 话 , 则 最 东 喘 的 城市 
站 可 以 看 作为 被 访问 两 次 ; 

《4) 顶点 1 作为 源 点 ,顶点 x" 作为 汇 点 (图 6-11). 


图 6-11 


然后 对 上 述 网 络 = 求 最 小 费用 最 大 流 ,其 结果 形成 : 

一 条 由 顶点 1 至 顶点 ”、 弧 容量 为 1 有 旦 互相 连接 的 若干 条 弧 组 成 的 流 , 表 示 往 程 航 
线 ! 另 一 条 由 顶点 二 至 顶点 1、 弧 容量 为 1 且 互 相连 接 的 若干 条 履 组 成 的 流 , 表 示 返 程 航 
线 ;这 两 条 流 上 的 [( 顶 点 序号 十 1)/2] 即 为 往返 航线 上 被 访问 的 城市 序 导 。 

显然 最 佳 的 旅行 路 线 上 经 过 的 城市 数 一 2X (x 一 1) 一 流量 费用 。 若 可 以 经 过 所 有 城 
市 的 话 , 则 城市 数 二 流量 费用 十 2。 


2. 程序 题解 
program airlines; 


{航空 间 题 } 
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maxn = 100; 
type 
node — record { 网 顶点 类 型 : ) 
b,c,f,w : shortint; ER FMAM MEH) 
end; 
gtype = array [1.. maxn,l. . maxn] of node; ( 网 类 型 》 
pn = record { 可 增 广 轨 顶 点 类 理 : } 
le * integer (5B dp ERIRIKB } 
end; 
nametype = string[ 20], ( 城市 名 串 } 
var 
f : text; { 文件 变量 } 
nsgstsv : integer; ( 城市 数 , 源 点 ,、 汇 点 、 航 线 数 } 


1 : array LL. . maza] of pn; | WAJ $h } 
pm 1 array [1. . maxn,1. .maxn] of boolean; ( 邻接 矩阵 } 
g 1: gtypes iA) 


nl array [1.. maxn] of nametype; | 城市 名 序列 } 
function p(s * nametype) : integer, 《返回 城市 名 s 对 应 的 序号 } 


Var 
i * Integer; 
begin 
fori: =1 to n do 
if ni[i]=s then 
begin 
p: =i;exit 
end 


end; 


procedure init; 
var | 
ij * Integer: 
str,51,82 ! string: 
begin 
write ('File name = 0, ( 读 入 文件 名 并 与 文件 变量 连接 } 
readIn (str) ; 
assign (f ,str) ; 
reset (i); ( RHEA } 
readli(f nv); ( 恋 入 城市 数 和 航线 数 } 
for i + —1 to n do readin (f nl [iD ( WARTEN } 
filichar (pm sizeof (pm) ,0) ; : 
fori: =1 to v do { 依次 读 入 每 条 直通 航线 } 
begin 
readin (f, str); 
sl: =copy (str, l posl ' ,str) — 1), 
s2: —coapy(str pos ' str) J- 1,length (str) - pos(' ,str))s 
pm[p(s1).pGs2?] : —true, 
pm[p(s2),p(s1)] : 一 true 
end 


ea 34» 


end: 


procedure make. graph; ( JEAN } 
var 
i,j: integer; 
begin 
fillchar (g sizeof íg), $fe); ( —2 ! 
lori: —1 to n do 
begin 


with g[2*i—1.2*i]do { ÆA 2i —1 至 顶点 2i i£ — RE. ERES LR 01 


begin 
b:clye: 0f: =0 


end ; 
ior j: 一 i 十 ] ta n do 
il pm[1.3] then 
Ci : spp j AMAG TEIL 2: 2T 8E 2 一 1 ERM EROS 1) 
with g[2*i,2 «j—1]da { 费用 为 j 一 i 一 1 } 
begin 
b: -lie: —j—i—lif: —0 

endi 


end; 


g[1.2].b : —Zig[2*n—1,2*n].b1 一 2; ( ISEG.ZURIE Gn — 12008] ERA 2 1 


s: —1,1: —2*n ( HASIA 1:1 ACSTEUS Zn ) 
end; 


function shortest + boolean: { 若 存 在 最 短路 径 ,返回 true, 27 Wa [8] false ! 


var 
14j ! integer: 


brk : boolean; 


begin 
for is =a ro t do l[i]. c ! —maxint, 
1[s1.1 : —0;I[53. c : —0; 
repeat 


brk + =trues 
for i+ =s to t do 
for j' =s to t do 


i£ Gr[i.3]. wa> — 2) and ([i]. e 7maxint) and (Li. cT gLi.1]. vw «Lil. c) 


then begin 
IG]. e: —Hil.c-- gil wi 
i£ gi. jl. f«g[i.i] b then 1[3].1* =i; 
if g[3,11. £770 then I1]. 1 :  — i; 
brk : = false 
end 
until brk; 
if I[t]. c — maxint then shortest : =false 
else shortest : —true 
end ; 


function ford 1 boolean; 
var 


14j * integer; 
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begin 
foris —s to t do 
for j: =s to t do gii]. w : =— 2; 
fori: =s ta t do ( 根据 当前 可 行 流量 ,给 w 图 赋 权 } 
for j? =s to t do 
if gi. d] £2 —2 
then begin 
if gLo3). £g Li,j]. b then gii]. w! —gli.i- c: 
if glij]. £270 then gf ji]. w ! =—g[i,j].e 
endi 
ford + —shortest ( # w Br 5E 3R ALT s 至 顶点 + 的 最 短路 } 


end; 


procedure fulkerson, 
var 
i,jdelta + integer; 
begin 
delta * —maxint; 
i' 一 ti 人 从 项 点 t+ 开始 ,个 向 计算 调整 量 delta } 
repeat 
if Li]. 1770 then j ! —g[1[i]. bi]. b—g[1Ei T. 1,33. f; 
if IGJ. 10 then j 1: —g[i.—1[i]. 1]. fs 
if j« delta then delta : =j; 
i: —absQI[11. D 
until i—5; 
it —t (Ct rd. Bur eI PEDES ) 
repeat 
if ifi]. 1270 then inc(g[i[i]. 1,i ). £:delta? ; 
if Ifi]. 1«20 then inc(g[i. —1[i]. 11. f, delta, 
i! =abs 4i]. D 
until i—a 


end; 


procedure proceed; ( $ N 网 的 映 小 费用 最 大 流 } 
begin 
while ford do fulkerson 
end; 


procedure answer, 
var 
i,j»k t integer; 
begin 
ifgL1. 2]. t<> ( FREM 1 WER ) 
then begin 
writeln (No Answer’) halt 
end; 
k: =0; 
writeln Answer t ')s 
is =s; ( 从 城市 1 出 发 ,打印 往 程 航线 } 
while i< >t—1 do 
begin 
«86 。- 


write(nli (4-1) div 2] 一 一 人 
j: i2, 
while Cg[i-- 1,3. £27» 1) do inc(j); 
gli sj]. f: 一 一 El .fi =i;inc(k); 
end, 
writeln CnlLfi 十 1) div 2D: ( 从 城市 ma 出 发 ,打印 返 威 航线 } 
while i<>s do 
begin 
write(nl[ (i4- 1) div 2], — —5; 
i: —i—li 
while g.i]. £771 do deelj}; 
elil E* = —gliil fü: —j—1:;nc(: 
end; 
wtitelntnl[ G+1) div 2: 
wtiteln(' Have travelled ' ,k.' cities"), 
writeln OK ! 2; 


readin 
end, 
begin 
init; (RARI! 
make. graph; {i N [9E ) 
proceed; CRN 网 的 最 小 费用 最 大 流 } 
answer { 输出 最 佳 航 空 路 线 } 
end. 


6.4 求 容量 有 上 下 界 的 网 络 的 最 小 费用 最 小 流 和 应 用 实例 


6.4.1 求 容量 有 上 下 界 的 网 络 的 最 小 费用 最 小 流 
一 、 问题 及 其 求解 法 


现 有 一 个 网 络 N,N 的 每 条 弧 。 对 应 3 个 数字 ;BCe) 和 Cle) 分 别 表示 颖 容量 的 上 界 
和 和 下界:4(e}) 表 示 缴 的 单位 流量 费用 。 所 请 求 容量 有 上 下 界 的 网 络 的 最 小 费用 最 小 流 , 媚 
求 满足 下 列 条 件 的 最 小 流 Fo: 

1. BGOs;FGOSC(O; 

2. J F(0— >) Fle) =0 U x st 


sE FK» e€ «(t 

3. 流 的 普 运 输 费 用 BE) 一 MAG) x Fo 取 极 小 值 。 

实际 生活 中 ,很 多 问题 可 转换 为 求 最 小 费用 最 小 流 。 例 如 下 一 节 所 述 的 餐厅 问题 ,就 
是 其 中 的 一 例 。 有 了 6. 2 节 求 容量 有 上 下 界 的 网 络 的 最 大 流 和 6. 3 节 求 最 小 费用 最 小 流 
的 基础 。 我 们 不 难得 出 解决 这 个 问题 的 一 种 方法 : 

1. Ht 6. 2 节 所 述 的 办 法 ,构造 一 个 附加 网 NF 

(D 新 增 两 个 顶点 5,7, 其 中 s 称 作 附 加 源 ,z 称 作 附加 汇 ; 

C22 对 原 网 络 N 的 每 个 顶点 吉 一 条 新 统 e 二 2, 这 条 弧 的 容量 为 所 有 al) 容量 的 下 
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限 之 和 , 即 志 (e) 一 BG» 


"eU 
(3) 对 不 网 络 N 的 每 个 顶点 U 加 一 条 新 弧 e SU 3X 2E LEA EE ICA BID ULU. 为 头 的 
3e FREZA, BH CQ 一 2 Bie); 
rE BU) 


《4) 原 网 络 N 的 每 条 弧 在 N MRU MAE COBEHE Be); 

(5) ARMAR e= st ye 二 ts 。e 的 容量 已 te) 一 coye 的 容量 Ce) 一 cc。 

2， 求 附加 网 N 的 最 大 流 。 若 结果 能 使 流出 * 的 一 切 苞 售 满 载 ( 即 5 出 发 的 所 有 弧 e, 
CG) - FG), ll N 网 有 可 行 流 Fio FG -BGO HEPR 3,25 WIN. 网 无 可 行 流 。 

3 为 了 寻求 关于 下 的 最 小 费用 ,我 们 构 进 一 个 赋 权 有 向 图 WE, CHRANI N 
网 的 顶点 ,而 把 和 N PO RET RR CV V. TIE RRLPS STE 7r ILE] SCC; V ) OZ VO ,定义 
WCF) 中 的 强 的 权 为 ， 


W.. 一 一 


g 740 (F,  Bj)andCG = i) 
oo (GF, & B,DandCG i) 
《长 度 为 co Bs ET EL WCF) PEE) 

然后 ,在 WCF}) 中 寻求 一 条 从 V, 到 ,的 最 短路 。 

4. 藻 不 存在 最 短路 , 则 为 容量 有 上 下 界 的 最 小 费用 最 小 流 ，2) Ale) X FCO 为 总 
输送 费用 

若 存在 最 短路 , 则 在 原 N 网 中 得 到 相应 的 可 改进 路 了 ,这 条 可 改进 路 的 前 向 弛 已 十 
为 最 短路 上 FF 值 大 于 BB 值 的 弛 的 集合 ,后 向 弧 忆 一 为 最 短路 上 AUDIT KART. B (RES 
的 集合 。 

在 可 改进 路 Ei 下 进行 调整 ,调整 晤 为 

Q = min[min (F(e) 一 Ble)) min (C(e) — Fle))] 


b Ai F; > Bj 


从 顶点 出 发 ,向 s 顶点 倒 推 , 按 下 述 规律 缩小 可 行 流 : 


F(e) -Q ec P— 
F(e) —Q ec P 
BAH np fr F.A [BIER 3。 


—. 求 客 量 有 上 下 界 的 网 络 的 最 小 费用 最 小 流程 序 


program bounded. minimum- flow ; 


Fe) = 


uses 
erts 


const 
max = 50; 


type 
edgetype = record ( 网 顶点 类 型 : } 
{ 单位 流 最 费用、 下界. 上 办. 流量 、 权 } 
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asbicsfsw : integer; 
end; 


graphtype 一 xn.l..maxn] of edgetypes( 网 类 型 } 
Itype = array [1.. maxn] af integers ( 顶点 序列 类 型 } 
settype = set of l.. maxn: 
var 
g + graphtypey (E) 
Lll. ft + itype; { 标号 表 、 畏 助 表 , 增 广 轨 } 
st : settype; {已 检查 顶点 集合 } 
n,s8,t 1 integer; (WAR. ES 
f MET { 文件 变量 } 


procedure init; 
var 
ij * integer: 
str * string; 
begin 
clrscr, 
write('file name = '): { 读 入 文件 名 并 与 文件 变量 连接 } 
readin(str) ; 
assign(f ,str) ; 
reset (ED) ,. { 读 准 备 } 
fillchar (g ,sizeof (g) 0); 
readin C£ r2; { EAMAN } 
while not eoftf) do 
readin £,i,j gli. i]. b.g[i.3]. cgl]. a) 
(EAMH. ERE IRE US } 
close(f); 
end; 


function min(a,b t integer) : integer; ( 返回 a.b 间 的 小 者 } 
begin 
if a«h then min + —1 
else min + =b 
end; 


procedure ke. xing. liu; 
var 
vu * integer; 
begin 
repeat 
fülchar(l,sizeof (12,00, ( 标号 表 撤 空 } 
i[s]: —maxint; B X Jo } 
st! —[]; fte] —0,(€ EI EI UCACO TEE A s 顶点 出 发 搜索 增 广 轨 } 
repeat 
yt =0; 
repeat 
ine(v) 
until (v >n) or Cl[v 7-0) and not (v in st}; 
if v<=n {v 顶点 已 标号 } 


then begin 
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for u : =1 to n do 
if I[u]=0 then 
.{ 车 与 顶点 v 相 联 的 顶点 u RES WME ES Et 
{ 并 乾 推 可 改进 量 1[t] } 
if glvrul].f<glys ue 


then begin 
1[u] : 2min([v]«gEv.u]. e—g[vsu1. D: 
ft[u] : =v 
end 
else if gLu,v ]. £270 
then begin 
llu] t — mincl[ v), gluv]. D: 
ft[u]: ——v 
end; 
st ! —st--[v]s (v 进入 检查 顶点 集合 } 
end, 


until (v>>n) or [t] 0), { ZAA ARIER BU IE 1 
i£ i[ec]70 ( 著 增 广 执 存在 ,期 从 汇 点 t 倒退 ,修正 轨 上 各 弧 的 容量 } 
then begin 
u 5 =t; 
repeat 
if ft[u]770 
then g[ft[u],u]. £ * —-gift[u].u]. f--1[13 
else g[u, —ft[u]). £s =gLu, —ft[u]]. fÍ—l[t]; 
ut —abstít(u D: 
until fe[u]—0; 
end 
until vn 
end; 


function ke. xing * boolean; 
var ' 
i,j ' integer, 
begin 
s 一 nn 十 ly t: —n--2, ( WWA s LAO 
fori: =ł1 to n do ( $ N W ) 
for js =1 to n do 
if g[i.j]. 0770 then 
begin 
g.i] e: —8lid. cgi.) b: 
(EN 中 保留 原 边 tle}=cte) 一 b(te)} 
gli5t]. e : —g[i.t c gli.i]. bs 
{ 对 G I8 — Ds i Imi oto BG ES cQ) - ble) (eE€ali))} 
gl5.i].c * —gl ssi]. c-goi,j). b 
Ut G KRETA j BU s.j XL EDI c0 XbC0 eEG) 
end, 
gli»n].c* -maxint, g[n.i).c : —maxinti 
mii «s Aae, ARER elscs ) 
inc (n,2)1 


ke xing liu, { GE N HG ) 


a 00 a 


dec(n,25; 
fori: =1 tọ n do 
{ 荐 5 相连 的 每 条 弧 的 流量 之 上 界 ,返回 true, AWE E false ) 
if gfs,il, f<g[s,i].c 
then begin ke. xing + “false rexit! end; 
ke.xing ! =true 
end; 


procedure shortest way in wi; 
{ 求 s 至 t 的 最 短路 径 扩 和 = 至 各 顶点 的 最 短路 径 代价 工 } 

var 

ij * integer; 

mote boolean; 
begin 

fori: —1tondol[il: —&g[s,i]. ws { 1 初始 化 为 s 至 i 的 权 } 

fori: —1 ton do ft[i] : =8; 

ES DUULCEOEERE 208b 6:1 cim 

repeat 

ll: =l; more ! —false; 
for i: —1 to n do 
for j: =1 to n do 
i£ U[j]<mazxint) and (g[jsi]. w«maxint) 
and CIlfj]--g[jsi]. vw «11 then 
begin 
Wi]: —HU[ jr goi. wi 
ft[i] + =j; more : —true, 
end 

until not more 

end: 


procedure min. cost. flow; 
{ 在 求 出 容 芭 有 上 十 界 一 个 可 行 往 的 基础 上 求 最 小 费用 景 小 流 》 
var 
is} * integer, 
begin 
repeat 
fori: =1 to ndo ( 构造 赋 权 有 向 图 w(f》} 
for j: =1 to n do 
i glisi]. Cog[isj]. b 
then glij] w: =—glisi]. a 
else if i=j 
then gij]. w : —0 
else gli]. w : —maxinti 
shortest. way in.w; { 求 最 短路 从 ft } 
于 1 之 maxint then. { 若 最 短路 存在 } 
begin 
i! =t; j? -—maxint, 
{ 从 t 顶点 计算 调整 数 js min[min Cf ? —b;) min} (Cat 701) 
U 
(uc — IE ERIS IL EE b 值 的 弧 集 合 } 
s 0] » 


(u— — SS BIS E 1f b 值 的 弧 集 合 } 
repeat 
if git], i] £g Ri]. b 
then j: —minC.githi);l f£—g[ftli].i). b) 
else j: —minG.g[i.ft[1]]. c— g[i.fti1]. 0: 
ie =fti] 
until i—5; 
it =t} 
repeat ( 从 + 项 点 倒 推 ,调整 em) 
if g[ft[i].i]. fgl]. b + [RU xidj€u—| 
then decCg[ft[1],1]. f,j) -| } 
else inc(g[i.ft[i]]. fi); 1 fDi «ij€uc) 
i: =ft[i]; 


until i=s; 
end; 
until [t ]=maxint ( 直至 无 最 佳 路 径 为 止 } 


end; 


procedure main; 
var 
i.jcost + integer; 
begin 
if not ke xing ( Hi NAR N' HAXH. ERTERERCK BL + 打印 失败 信息 } 
then writeln(’No ke xing liue’) 
else begin 
s: —1, t: =n; { 恢复 源 点 和 汇 点 } 
gUs»tl. c: 20; ELst lf， =0; gts]. c: =0; gftrsj.f: =04 
( fiet Gs PHIL) 
fori* —1 to n do 
for j: =1 ton do 
begin 
glij] c: —glidl.ctrglisjl.b: 
{ 恢复 原 坟 网 的 上 界 } 
if gli,j].c>0 
then ine tg[i,jj. £.g[i,j ). b 
BIOLIORITOR 作为 初始 网 的 一 个 可 行 流 } 
else gli,j], f! =0 
end; 
min. cost flow; ( ZE3 il n[ 17 LO 2E RUE E LoR i PERI b } 
cost è 一 03 
fori: =1 tọ ndo 
{ 打印 最 小 费用 最 小 统 的 流量 ,计算 流 的 总 输送 费用 } 
for j' =] to n de 
if g[i.j1. £770 
then begin 
writeln(1,!— ——'.),! s: '.gi.i]. Ds 
inc(cost ,g[i.3]. f * g[ i.i]. à? 
end; 
writeln('total cost : ',cost?) 
end; 
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end: 


þegin 
init; ( SE) PERDRE. T FHEPASRN } 
maini [ 计算 和 输出 N 网 的 最 小 费用 最 小 流 } 


end. 


6.4.2 一 个 应 用 实例 一 一 餐厅 问题 
一 、 问题 及 其 算法 


一 个 餐厅 在 相继 的 N 天 里 ,第 i 天 需要 7 块 餐 由 (f==1,2,… N), 餐厅 可 以 购买 新 的 
餐 市 ,每 块 餐巾 费用 为 p 分 ,或 者 把 旧 餐 巾 送 到 快 尝 部 , 洗 一 块 需 m 天 ,其 费用 为 了 分 ,或 
者 送 到 慢 洗 部 , 洗 一 块 需 x 天 (Cn > ,其 费用 为 二分。 每 天 结束 时 ,餐厅 必须 决定 多 少 
块 脏 的 餐巾 送 到 快 洗 部 ,多 少 块 送 到 慢 洗 部 ,以 及 多 少 保存 起 来 延期 送 洗 。 但 是 洗 好 的 餐 
市 和 购买 的 新 餐 中 之 和 ,要 满足 第 : 天 的 需求 量 ,并 使 总 的 花费 最 小 。 

要 用 末 詹 法 解 餐 巾 问 题 , 其 时 效 非常 低 。 若 采用 最 小 费用 最 小 流 解 题 , 则 简捷 得 多 E 
先 我 们 根据 题 意 构 造 一 个 新 网 络 D. 

为 了 安排 好 N 天 里 的 餐巾 合用 计划 ,我 们 将 一 天 看 作 两 个 顶点 , 即 第 ; 天 拆 成 顶点; 
MAA OSIS, AWARA s 和 一 个 汇 点 ,构造 出 一 个 具有 2X (CNY 十 1) 个 顶点 的 
网 络 D. D 交 中 ,每 一 条 弧 的 上 下 界 AORN 5B(e) 和 表示 某 段 时 间 内 购买 ( 快 洗 或 慢 洗 或 保 
存 ) 餐 巾 的 最 大 值 和 最 小 值 ; 流 重 Fte) 表 示 实 际 餐 巾 数 ; 单 位 流量 费用 Cte) 表 示 购 买 (或 
送 洗 ) 每 条 餐 市 的 费用 。 最 初 的 餐巾 使 用 计划 对 应 了 这 个 网 络 DORÉ 6-12): 

1. HAs 至 顶点 i 连 一 条 弧 e, 该 弧 的 Ate)==0,B(e) 二 Fle)== 第 i 天 的 餐巾 用 量 ， 
Cle) 二 每 条 新 餐巾 的 价值 ,表示 在 最 初 的 餐 用 计划 中 ,前 i 天 未 洗 过 或 未 购买 过 任 仔 餐 
W Bi 天 开始 买 是 新 餐 店 ; 

2. 顶点 i 至 顶点 7? 连 一 条 弧 e, 该 弧 的 A(e)= 二 Ble) 一 Fle)= 第 i 天 的 餐巾 用 量 ,Cle) 
二 0, 表 示 当 天 所 和 浸 的 餐巾 全 部 保存 起 来 ,延期 送 洗 ; 

3. 顶点 i TAXE Me XH AGQO—0,BG0—99,CGO —0, FGOIU SS : 天 的 
餐巾 用 量 , 表 示 第 i 天 以 后 不 青 购 买 或 送 洗 餐 由 

4. EMA EGHIZ EER e ELS] AC — 0. BG — 00, C GO — 0 3E ZR i 
X 8I — IDA RD ,延至 第 iT1 天 处 理 ; 

5. 车 第 i 天 快 洗 的 归 餐 市 能 在 最 后 一 天 前 使 用 (十 快 洗 天 数 志 和 N), 则 在 i' 率 顶点 (3 
J- He ACKUBO zr [813€ — AM e TL A (e) —0, BG — o0, CGO — Beg e f rag S RI 
表示 第 ; RARE P, 

6. 若 第 i 天 惕 洗 的 旧 餐 由 能 在 最 后 一 天 前 使 用 (十 慢 洗 天 数 筷 入), 则 在 顶点 i 至 
十 慢 洗 天 数 ) 之 间 连 一 条 就 e AMH AGO = 二 0,Ble) 二 o0,Cle) 二 要 洗 每 条 餐巾 的 费用 ， 
表示 第 e 天 人 允许 慢 洗 餐 市 。 

然后 从 上 述 的 可 行 流下 出 发 , 求 网 络 厂 的 最 小 费用 最 小 流 ， 我 们 可 以 从 弧 澳 量 中 得 
出 每 天 餐 中 使 用 的 计划 。 

HFA Os s NYXEIBR: 


* 035 


a0 
amb f-—rü) beoo 


c=0 < 一 0 往 ，rG) 一 一 第 ;天 的 餐巾 用 量 
(OY iti Ñ deme it ”一 XR 
5 4 . "a pe em or E dix 


图 632 


D 网 络 中 顶点 ;至 项 点 i 的 统 流 量 表 示 当 天 购买 的 餐巾 数 ， 
A i 十 快 洗 天 数 志 入 , 则 顶点 直 至 Ci 十 快 尝 天 数 ) 的 弧 流 量 表示 当天 快 洗 的 餐巾 数 ; 
若 i 十 慢 洗 天 数 N, 则 顶点 i 至 G 十 慢 洗 天 数 ) 的 弧 流 量 表示 当天 慢 洗 的 餐巾 数 。 
顶点 至 顶点 的 弧 流 量 表示 当天 保存 起 来 延期 送 洗 的 餐巾 数 。 
YEN 天 中 购买 的 餐巾 数 X 新 移 巾 的 单位 价 十 快 洗 的 餐 申 数 X 快 洗 单 价 十 慢 尝 的 餐 
市 数 X 慢 洗 单 价 。 即 为 总 的 花费 最 小 的 一 种 方案 。 


=. 程序 题解 


program napkin, 


uses 
crt, 


const 
max = R1; 
type 
edgetype — record ( MAA ) 
a. f, c1 byte; { 下 漠 , 流 最 ,上 界 . 单 位 流 景 费用 , 权 } 
b, w integer: 
end, 


graphtype = array (0. . max, 0, . max] of edgetype; 
ltype = array [0. . max] of integer; 
settype = set of 0,. max; 


var 


E graphtype; (RR) 
1, ll, hr: ltypes (s 顶点 至 各 顶点 的 路 径 代 价 , 输 助 变量 ,最 佳 路 径 } 
r+ hype, ( 每 天 的 餐巾 用 量 } 
num, ss, ff, pp» mm, nn * integer 天数 . 慢 洗 费用 Dei TERR CR CU OS p C Pei CE E E 
XX 
nss, t: integer, ( 网 的 顶点 个 教 , 源 点 . 汇 点 } 
f: text, { 文件 变量 } 
procedure init# 
i, j* integer; 
Bt sttingi 
begin 
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clrscr+ 
write(/Filename > '), 


readin(st) ; { 输入 文件 名 } 

assign(f, st); { 文件 名 与 文件 变量 连接 , 读 准 备 } 
reset (£5 ; 

resdin(f, num), GEXB 


fori := 1 to num do { 读 每 天 的 餐巾 用 量 } 
read (£, r[i])) 
read (f, pp, mm, ff, nn, ss) 上访 新 餐巾 的 价值, 快 洗 餐 由 的 天 数 和 洗 的 费用 . 慢 洗 餐 市 的 天 
数 和 洗 的 费用 } 
fülchar(g. sizeof(g) , 00, { PERRE } 
n :一 num#2 十 1 {0 为 源 点 ;2 x 天数 十 1 为 汇 点 ,构造 全 网 } 


& 1 4 
t := 1 
fori * = 1 to num do 
begin 
j : =ij#2—l1; 
with g[0, j] do {0 至 ix2 二 1 连 一 条 边 } 
begin 
a i= 0} THAO} 
b s: = rii]; ( ERI EE AS RHR HEHE } 
€ 1! pp { 单位 流量 费用 为 新 艾 中 的 价值 } 
fiz rli]; 
end; 
with gL: j+1] do 1ix2 一 1 至 ix#2 连 一 条 过 ) 
begin 
a t= rlij; { 上 界 . 下 界 和 流量 为 第 i 天 的 餐 中 用 量 } 
b: = rü]: 
c 10, |XD NET) 
f := rii]; 
end; 


if inum then { 车 该 天 非 最 后 一 天 , 则 } 
with gLj-1. j 十 3] do { ix*2 容 i#2 十 2 连 一 条 边 } 


begin 
a := 0; { 下界 为 0} 
b := maxint; { 土 界 为 元 穷 大 } 
ci 0 ( 单位 流量 费用 为 0 } 
end; 


让 i 十 mm 之 二 num then (| EC RTL BERE ID EO 
with g[32-1, 2* G-+mm})}—1] do (isz Zirt 快 许 天 教 一 1 连 一 条 边 } 


begin 

a t= 0; { 下 界 为 0} 

b := maxints { 上 界 汶 无穷 大 } 

ce = ff; (ieai RS PE NE } 
end; 


if i+nn<=num then ”1 若 该 天 可 以 慢 洗 餐巾 , 列 } 
with g[j--1, 2* G--n)—11do {i#2 容 i#2 十 2* 惯 洗 天 数 一 1 连 一 条 边 
begin 
at= 0 | {下界 为 0} 
s. 95. 


b : = maxint; { 上 界 为 无 穷 大 } 


c += as; { IA Libo d NE 
end; 
with g[j4-1. t] do [i2 2» X81 连 一 条 边 } 
begin 
a i = 0 { 上 界 为 0 } 
b : = mazint; { 下 界 为 无 穷 大 } 
c:= 0; { 单位 流量 费用 为 0 } 
f: = rii]; (HEAR i 天 的 餐巾 用 量 } 
end; 
end; 
elose D ; 
end: 
function min(a, b ! integer)? integer;  ( 返回 ab 得 的 小 者 } 
begin 
if ab then 
min :一 8 
else 
min ! — bi 
end; 


procedure FindShortestPath; 
var 
i+ j? integer; 
more : boolean; 
begin 
fori t = Oto n do l] : = gis, ilw, CL 初始 化 为 s 4e mi xai } 
fori ! = Oto n do hli] * = s; { KRAKE HHA s 至 各 顶点 的 路 径 代 价 工 } 
repeat 
1 :一 1 
more ! = false; 
fori : = 0 to a do 
for j : = Ô to n do 
if (Ij ]«maxint) and (gD, i]. w«maxint) and (li[512-g[j« i]. weli] then 
begin 
more : = true, 
I[i] s = ütj]--glis il. wi 
bü] =j; 
end; 
until not more; 
end; 


procedure main; 


var 
i» j! integer; 
begin 
repeat 
fori * = 0 to n do { 13 54 WE) } 


for j * = 0 to n do 
if g[i, j]. £ gii. i]. a then 
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g[i il. w : = —gli; j].c 
else if gli, i]. f«g[]» i}. b then 
gli, il w : = gÜ, il.c 
else if i = j then 
gli, jj.w :=0 


else 
gli, jw + = maxinti 

findshortestpath, { 求 最 短路 径 h 和 S 至 各 顶点 的 最 佳 路 径 代价 } 
if [Lt]<0 then { 最 佳 路 径 存在 } 
begin 

i'-—t, UA CRAS BIHTEWEIENE J) 

j * 一 maxint: 

repeat 


if 名 [hi i]. £2 g[h(il. i]. a then 
j ' = minj, gih], ij. £—g[h[i]. ij. a? 


else 
j : = minG, g[i, hi1). b—gli, h[iTi. D; 
i := hii]; 
until i = s; 
i'—t { t MAME WE Su 
repeat 


if gfh[i), i]. £glh[i]. iJ- a then 
gLh[i]. i-£ » = g[hD). i]. £—j 


else 
gli, hG] f : = gii, hA fii 
is = hlijs 
until i = 8; 
end, 
until l1]2» 20; { 直至 无 最 佳 路 径 为 止 } 


end, 


procedure show; 
var 

i, jr cost + integer: 
begin 

cost ! = 0; 

fori : = 1 to num do 


begin 
j*7i*21 
writeln( Day ', i, Y); { 打印 第 i 天 1 


vwriteln('Buy ' , g[ 0, j— 1]. f» 'new napkins.'): 
{ 购买 新 餐巾 数 一 一 0, 所 一 1}) 的 流量 } 
cost : = cost--g[ 0, j—1].f * pp: 
writeln ("Use ', r[1], ' clean napkins. ') 
if i+mm<=num then ( BAIE SE —— (21,2 mm 一 1) 的 流量 } 
begin 

writeln’ Fast wash ' , gG, 2 * (i4-mm) —13]. f. ' napkins.'), 

cost + = cost--g[j, 2 * (id-mm) — 1]. f « ff; 
end; 
if i4-nn«-—num then ( 惕 洗 餐 巾 数 一 一 (2i,2ti 十 nn) 一 1) 的 流量 } 
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begin 
writeln( Slow wash ' , g[j. 2 * (i--nn) —1].f, ' napkins.'); 
cost : = cost +glj, 2 * (--nnD —- 1]. f * ss; 
end; 
if i«num then ( RIDE (i2 TOBHLRE ) 
writeln( Leave ', g[j. j2- 2]. f. ' dirty napkins. ')i 
writeln('Press «CENTER to continue. .. 2i 
readln, 
end: 
writelnC Total cost : ', cost): 
end; 
begin 
init; ( 给 入 数据 ,构造 可 网 } 
main; { 通过 求 N 网 的 最 小 费用 最 小 流 , 得 出 最 佳 方案 } 


show: ( 输出 结果 ，} 
end. 
6.5 求 有 供需 约束 的 可 行 流 
一 、 问题 及 其 分 析 


6-13 是 一 种 桨 品 供应 系统 , 疡 的 方向 表示 商品 流向 , 弧 土 的 数字 表示 商品 从 某 地 
至 某 地 的 最 大 通过 能 力 。 商 品 的 货源 来 自 于 基 ,,X， 
X, X, 的 供应 量 为 5,Xs 为 10;Xs 为 5。 这 些 商 
mE Y YoY, HH BR. Y, 的 需求 为 5,Y; 为 10,Y， 
为 5。 僻 是 否 所 有 的 需求 错 可 同时 被 满足 ? 

上 述 网 络 是 一 种 特殊 的 网 络 ,在 这 个 网 络 中 , 源 点 
和 汇 点 都 不 止 一 个 。 对 于 每 一 个 源 点 X OSSIA 
说 ,存在 一 个 供应 量 ; 对 于 每 一 个 汇 点 Y, js 303€ 
说 ,也 存在 一 个 需求 量 . 题 目 所 要 求 的 所 有 汇 点 的 需求 
量 是 否 同 时 被 满足 的 问题 ,可 以 归结 为 以 下 数学 模型 ， 

N I — ^ RR EAN e 对 应 一 个 弧 容量 Cle), 又 顶点 集合 X, X, Xn E 
源 集合 ,4(X) 是 源 点 成 MRSE: MARS Y= ron Y ELR PODELA 
的 需求 量 。 现 在 ,要 求 出 满足 下 列 条 件 

OD SEP BORSE e oc FGOSCQGÓ: 

(D 对 于 除去 源 点 和 汇 点 的 中 间 顶 点 U , 2 Fee) 一 X Fe) 一 0 


e£ ac) 


图 61a 


D 22 Fo 24 FOSA) ISKN) 
4€ e( X3 e& BUCO 

即 对 于 产地 , 求 不 能 过 于 供 ， 

(4) D FG) 一 M Fe) ZPO axis N) 
e£ BU.) r€ «1 


即 对 于 销 地 , 供 不 能 低 于 求 的 流 王 , 这 个 流 称 为 满足 供需 约束 的 可 行 流 ， 
$8 。 


下 面 , 给 出 上 述 问题 的 算法 ， 

1,， 构 作 新 阅 络 N 

(1) 新 增 两 个 顶点 Xo Yu 

(2) Jf m 条 以 Xo OS FEES EL OX X 0 OG X D OG X 2 ,每 条 弧 的 容量 为 CLX。， 
XO-—AQ i 71,2, 7m 

(3) 加 n 条 以 Y, A13 Bg AL CY, XY4) ; CY; 4M PLL , 04D 4E FRANEA CCGG Y, 
—P(YD,u4-—1,2,7,m: 

(D 以 Xo 为 和 N' 的 源 点 ,了 为 N' IRE A. 

2. OK N' 的 最 大 流下 

E FERRA Yo 的 每 条 弧 都 满载 ( 即 CO SY) SFY YO Km i12: ND. UI 
FERAS N 中 满足 供需 约 昌 的 一 个 可 行 流 。 


二 , 求 可 行 流程 序 
program flow, 

( P191 ) 

( G15. dat t. dat! 

const 
maxn = 80; 

type 
nodetype = record ( 增 广 轨 顶 点 类 型 ， 标 号 标志 ,检查 标志 } 

l.p t integer; 
end; 
atctype = record ( 网 顶点 类 型 : 容量 ,流量 } 
ef 1 integer 
end; 

gtype = array [1. . maxn,1..maxn]ofarctype; {1 网 类 型 } 
ltype = array [1.. maxn] of nodetype; EJ LE 
settype = get of 1.. maxn; 

var 
it + kype: { 增 广 矩 阵 } 
E 1 gtypei BE 
VAS stan, { 项 点 数 , 独 点 . 汇 点 . 货 装 数 . 市 场 数 } 
dem 1 integers { 货源 的 供应 总 量 } 
f t text; { 文件 变量 } 
Xy * settypers { 货源 集合 ,市 场 集合 ; 
a,b z array L}. .maxn] of integer; 


{ 各 货源 的 供应 量 , 各 市 场 的 需求 量 } 
procedure read. graph: 
var 
str * string: 
jsj ! integer; 
begin 
writel Graph file = '), ( 读 入 文件 名 并 与 文件 变量 连接 1 
readin istr}; 
. 09» 


assign (Í,str); 
reset (D { 读 准 备 } 
readin (£v) ; { 读 入 项 点 数 } 
fillchar(g,sizeof(g) 00; { 网 初始 化 } 
fillchar<lt sizeof (lt) ,00,  ( 增 广 矩阵 初始 化 } 
forit 一 2 to v+1 do ( 读 入 初始 网 } 
for j : —2 to v4-1 do read (E g(i.j1. c2: 
readin(1 ,m.); ( 读 入 货源 和 市 场 数 } 
x: =f 
{ 读 入 每 个 货源 的 供应 量 。 注 : 第 1 个 货源 的 供应 量 存 人 a[i 十 1] } 
{x 存放 a 的 下 标 集 合 。 因为 在 新 网 络 中 ,所 有 顶点 的 序号 增 1, 以 新 增 一 个 源 Xo} 
for i: —1 to m do 
begin 
read (£j, a(j--1]) ;x t 一 x 十 [十 1 
end, 
y: —[1idem : —0; 
{ 读 入 每 个 市 场 的 需求 量 : 注 第 i 个 市 场 的 需求 景 存 入 b[Li 十 1] } 
{y 存 放 b 的 下 标 集 合 , 因 为 在 新 外 中 ,所 有 顶点 序号 增 1 } 
forir 一 1ton do 
begin 
read E ,j , b[j-- 1D iy + =y + [jt 1): 
dem 1 —dem--b[j--1)] 
end, 
close(f51 
end; 


function check 1 integer; ( 返回 一 个 已 标号 而 未 检查 的 顶点 序号 1} 

var 
i t integer; 

begin 
i! =g; 
while (i« —*) and not (Clt[i]. «77702 and tt[il.p=0)) do inc(i; 
if i27 then check : 一 0 

else check + =i 
end; 


function ford(var a 1 integer) + boolean; 《村 找 增 广 轨 和 改进 量 a } 
var 
i,j.m,x * integer; 
begin 
ford : —true; 
fillchar (lt sizeof (1t) 0); 


Its 1.1 ion], 
repeat 
i: —check, 


if 1—0 then exit; 
for js =s to v do 
if CIt[5). 1205 and €C(g[1.j]. c0) or (gL[j,i]. c0) 
then begin 
if Gri 3]. £g [i jd. c) then It[j].1 =is 
if Gi] £770) then ID 1.1 : = —i 
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end; 
It[i]. p * —1 
until CIt[t ]. 1-770); 
m: =tyat —maxint 
repeat 
j: —msm : —abs(k[j]. D; 
if tfj]. «C0 then x ! —g[ jm]. f; 
if It[ 11270 then x ! =g[m,j]. e—gLm.3]). £; 
if a27x then a ! =x 
until m—s; 
ford : —false 
end; 
procedure fulkerson(a : integer); ( 修正 增 广 胃 上 的 流量 } 
var 
msj ! integer; 
begin 
tni =t; 
repeat 
j: =m;m : —absOt[j]. D 
i£ Ie[j]. [0 then g[j;m]. £ 一 E[jinn].f 一 as 
if tG]. 1770 then g[m,j]. f: —g[m.j). fF a 
until m—s 
end; 


procedure answer; 
{ 若 s 顶点 至 各 货源 的 可 行 流 满载 , 则 表明 所 有 需求 同时 满足 ，} 
{ 打印 每 条 弧 的 可 行 流 ; 否则 打印 无 解 } 
var 
ij Integer; 
begin 
j? =% 
fori: =1 to y do j* —jo-g[ 1i] f; 
if j7dem 
then writeln(' No solution ') 
else for i: 一 2 to v—1 do 
for j: —2to v—1 do 
if glij]. £770 then writeln(i—1,' ——— —'.j—1.' ngii D 
end; 
procedure proceed; 
var 
ivdel integer, 
success t boolean; 
begin 
s: —];v: 二 Y 十 0;:t + =y; ( Bri s=, t=v+2 } 
iori: 二 2 to v—1 do ( i s AMARRA, MHARA ati) } 
if i in x then g[s;i].c» —a[1]: 
fori: —2 to v—1 do 
if i in y then gliti. c : =b[i]; 
{ 新 增 所 有 市 场 到 + 的 边 ,就 的 容量 为 pd) } 


repeat 
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success ! —lord(deD ; ( 在 新 网 中 寻 我 增 广 轨 和 可 改进 量 del } 
if success then answer ( 车 无 增 广 轨 , 则 输出 结果 } 
else fulkerson(de) 1 否则 修正 增 广 轨 的 流量 } 
until success; | 直至 新 网 的 最 大 流 求 出 为 止 } 
end; 


begin 
resd.graph, ( 输入 含 供需 约束 的 网 } 


proceed { 输出 满足 需求 的 方案 } 
end. 
6.6 求 图 的 连通 度 
—, 问题 及 其 分 析 


我 们 曾 在 第 四 章 “4., 1 连通 性 的 基本 概念 和 定义 ”一 节 中 给 出 图 的 连通 度 的 定义 ;就 
是 一 个 具有 N 个 顶点 的 图 侣 ,在 去 挤 任 意 & 一 1 1 DUSUS OS ND Erf E od 
而 去 掉 上 个 顶点 后 的 子 图 不 连通 , 则 称 G E k EBA, 称 作 图 G 的 连 道 度 , 记 作 RO. 

这 一 节 , 我 们 将 给 出 求 图 的 连通 度 的 算法 。 首 先 , 讲 述 一 下 独立 轨 的 概念 ， 

A,B ELME G. 的 两 个 顶点 ,我 们 称 为 从 4 到 B 的 两 两 无 公共 内 顶 的 胃 为 独立 轨 
(或 者 说 ,4,5 是 有 向 图 G 的 两 个 顶点 , 称 从 4 到 BB 的 两 两 无 公共 内 顶 的 有 向 轨 为 有 向 
3i 80 .A 到 8B 独立 轨 的 最 大 条 数 (4 到 8 有 向 轨 的 最 大 条 数 ), 记 作 PA, B). 

《 注 ;( ) 内 为 有 向 图 的 补充 定义 ,) 

例如 ,图 6-14 的 一 个 具有 7 个 顶点 的 连通 图 ,从 顶点 1 到 项 
点 3 有 3 条 独立 胃 , 即 P(l,3) 一 3 

1—2-—3 

1 一 ?一 3 

1 一 6 一 5 一 4 一 3 5 3 

如 果 我 们 分 别 从 这 3 条 独立 轨 中 ,每 条 轨 抽 出 一 个 内 点 ,在 人 t 
图 中 删 掉 , 则 图 不 连通 。 例 如 去 捧 顶 点 2,7,6, 或 者 去 掉 顶 点 2,7， B ocu 
5, 或 者 去 掉 顶 点 2.7.4. 

. 读者 很 容易 得 出 P(2,4) 二 P(2,5) 二 P(2,6)=P(3,5)=P(3,6)=P(4,6)=P(4,1) 
一 3。 即 每 两 个 不 相 邻 的 顶点 间 ,都 最 多 有 3 条 独立 轨 . 每 罗 任 删 一 个 内 点 ,也 会 使 图 G 变 
成 不 连通 。 显然 &G) 一 3。 着 连通 图 G 的 两 两 不 相 邻 顶点 间 的 最 大 独立 轨 数 不 尽 相 同 , 则 
最 小 的 P(A,B) 值 , 即 为 &(G)。 


D 
te 


KG) = 顶点 数 一 1 G 为 (双向 ) 完全 图 
Bin, P(A,B) GERED 完全 图 


GE: 双向 完全 图 , 指 有 向 图 的 任 两 个 项 点 互相 可 达 。) 
那么 ,如 何 求 不 相 邻 的 两 个 顶点 4, 吾 间 的 最 大 独立 轨 数 PA, B) ,应 期 去 图 中 哪些 
顶点 (被 删 顶点 数 一 忆 (4,B)) 后 使 图 不 连通 呢 ? 我 们 采用 求 最 大 流 的 办 法 来 解决 这 个 问 
题 ; 
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L 构造 一 个 网 络 NN 

EG 为 无 向 图 ， 

CD 原 G 图 中 的 每 个 顶点 Y EE N 网 中 的 两 个 顶点 VW 和 WV”, 顶点 V' 至 V" 有 一 条 强 
连接 , 弧 容量 为 1; 

(2) 原 G 图 中 的 每 条 边 e 一 UV ,在 N 网 中 有 两 条 红 e! —U"V" or 一 YY 与 之 对 应 ,e 
ANUS BE oo "MUR oo; 

(3) 4 "为 源 顶 点 , 召 ' 为 汇 顶 点 

EG AA mE CLA 6-15): 

(1) AG 图 中 的 每 个 顶点 V 变 成 N ARARA VAV MAY E VUE — S3 
ER MARY 1; 

《2) I G Bj B EARN, e—UV 变 成 一 条 有 向 轨 UUV V", ARREN UV 的 容 
Eo, 

(3) AARMA BP ACRA 

2. K AHE B' 的 最 大 流下 c 

3. 流出 4 的 一 切 弧 的 流量 和 su, FO HD P(4,B)。 所 有 具有 流量 1 的 弧 (7" ， 


VORMER V MAAR- THAME, P G 图 中 去 掉 这 些 顶 AL G 图 变 成 不 连通 。 

有 了 求 P(A,B) 的 算法 基础 ,我 们 不 难得 出 &(G) 的 求解 思路 : 

首先 设 &(G) 的 初始 值 为 oo, 然后 分 析 图 的 每 一 对 顶点 。 如 果 顶 点 4A,8 不 相 邻 , 则 用 
求 最 大 流 的 方法 得 出 PCA,B) 和 对 应 的 割 顶 集 。 若 P(A,B) 为 目前 最 小 , 则 记 当 前 的 £(G》 
值 为 P(4,B)，, 保 存 其 宕 顶 集 。 直 至 所 有 不 相 邻 的 顶点 对 分 析 完 为 止 ,就 可 得 出 图 的 顶 连 
通 度 &dG) 和 最 小 割 顶 集 了 ( 见 图 6-16). 


UG d 1 co 1 in" 
~ UV > U L" y |: g 
— o" 1 1 op H 
V- js 7 e i > | B Gn d NW 2 


(a) à» (a) {b} 


图 6-i5 6-16 
我 们 可 以 从 图 的 连通 度 中 ,引出 一 些 有 趣 的 结论 
1. G 是 的 连通 图 , 守 2, 则 任意 上 个 顶点 共立 ; 
2. G 是 上 的 连通 图 的 充 要 条 件 是 十 1 所 G 的 顶点 数 和 N, 从 图 中 任 取 一 个 含 记 个 顶点 
的 子 集 U AU 集 外 的 一 个 顶点 义 , 则 存在 | 上 | 条 具有 下 列 性 质 的 轨 : 
D 每 条 胃 的 一 个 端 顶点 为 五, 另 一 个 锅 顶 点 在 U 中， 
(2) 两 两 轨 间 , 除 写 外 再 无 公共 顶点 。 


Z. 求 图 的 连通 度 的 程序 


program din_lian_tong- du; 
{ 求 图 的 连通 度 1 
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crt; 
const 
maxn = 100 
type 
edgetype = record ( 网 顶点 类 型 : ARME? 
c,Í : integer; 
end, 
graphtype =  array[1.. maxn,1..maxn] of edgetype; ( 网 类 型 } 
Itype =  array[1..maxn] of integers ( 顶点 序列 类 型 ) 
settype = set of 1., maxn; 
var 
g 1: graphtype} {网 } 
1,ft : ltype; { 标号 , 弧 的 前 向 ,后 向 标志 } 
sat way :  settype; 1 已 检 桂 的 顶点 集合 ， [RUE 3 } 
了 ,3 外 1 integer; 《顶点 数 , 狐 点 , 拒 点 } 
f t text; { 文件 变量 } 


procedure init ; 
vat i,jk : integer: 
str : string: 
begin 
clracr; write C filename —'5, readIn(str); 
{ 读 入 文件 名 ,并 与 文件 变量 连接 } 
assign(f,str); reset(f); {EEA } 
regdintf ,n? ; { 读 入 顶点 数 } 
Teadlntfk)5 
{ 1 ”有 向 图 } 
nmd 
i 2 无 向 图 } 
fillchar (g sizeof (g) 02, { 网 初始 化 } 
fori: =1 to n do { 读 入 图 , 构 作 新 园 g= 《VY ,E) } 
gLivitnl.ce!: =1; 
while not eof (f) do 
begin 
readln Cf ij) ; 
gli--"n.j].c: —maxint; 
if k=2 
then gD}+ nii. et =maxint; 
end; 
close (15; 
end; 
function min(a.b ; integer) + integer, ( 返回 a:b HEDE } 
begin 
if a<b then min : =a 
else min : =b; 
end, 
procedure lord. fulkerson , 
var v.u 1 integer; 
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begin 
repeat fillchar <l ,sizeof (1) ,0) ; 
1[s] : —maxint; 
st: =[]; fts] : —0; 
repeat v : =0; ( 寻找 一 个 已 标号 而 未 检查 的 顶点 序号 v } 
repeat inc (Cv)s 
until (vn) or (Ifv ]70) and not (v in st}; 
if v 一 mn then 
{ 寻找 所 有 与 顶点 Y YES BOR SE UTI u IE v a EN T8] Pj ai Js IS] Rs) 
begin 
for us =} to n do 
if Iu j= 0 thea 
if g[v,u ]. fg[v,u].c 


then begin 
I[u] * 7min(l[v].g[ v.n). c—gLv.u). £}; 
Ít[u] + =v; 
end 
else if glu.v ]. £270 
then hegin 
i[n] * 2g[u, v]. f; 
itla]: 2—v; 
end; 
st: —st [v]: (v 进入 已 检查 顶点 集合 } 


end; 
until (v2-0) or CIt]«— 0), 
{ 直至 无 增 广 胃 或 找 出 了 8 至 + 的 增 广 罗 为 止 .该 轨 的 可 改进 晤 为 1[j } 
i£ 1[t]< 0 then 
{ 车 增 广 轨 存在 ; 则 从 预 点 t+ 开始 , 倒 向 调整 轨 上 的 流量 } 
begin 
ut 一 tf 
repeat if ft[u]>0 
then g[ft[u],u]. f s —g[fteu Jiu]. +1] 
else g[u,abs(ft[u])]. £ * —gl'u.absCft[u D . 3$—1[t]; 
u+ —abstft[u]); 
until ft[u]—0; 
end; 
until v>0; ( 直至 无 增 广 轨 为 止 } 
end; 


procedure main; 
var a,b,i.j.k.x.m : integer; 


begin 
k: -—maxint; m * —n;n' —n*2; 
for a : =1 to m do 


for b * —1 to m do 
if (ab) and (gla+m,b]. c— 0? then 
{ 者 二 ab> 不 在 图 中 } 
begin s : 一 a 十 my t: =b; { Ua Pb AE REAM Pab) } 
fori: =] ton do 
for j! —1 to n do 
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glisjJ.f: =0; 
ford- fulkerson; 
x: =); 
for i: =1 to n do ( Rtt Pla.b?) } 
ine (x g[s,i]. D: 
if <k { 若 Pfa,b) 为 目前 最 小 , 则 记 下 ? 


then begin 
kı =x; 
way : =[]; 
fori: =1 to m do 


{ 车 之 viyvwi 十 n 泛 的 流量 为 1, 则 对 应 的 vw WAA AA ) 
i£ g[i,i+mj.f=1 
then way : —way- [i]; 
end; 
end: 
if k—maxint then ( 若 为 完全 图 , 割 顶 集 为 [t, .mm 一 1] ! 
begin 
kt -—m—1, 
way * —[1..m-— 1]; 
end; 
writeln {ding lian tong du = ',k); (JTEDIEXE HE k AAEM)? 
lori: =1 to m da 
if i in way then writeln take din ' D, 
endi 
begin 
init; { 输入 图 , 构 作 新 网 } 
main; ( 计算 和 输出 连通 度 . 市 硕 集 } 


end. 


6.7 求 图 的 边 连通 度 


一 、 问题 及 其 分 析 


我 们 在 4. 1 节 中 关于 连通 福 的 基本 概念 和 定义 中 给 出 图 的 边 连 通 度 的 定义 ; 即 具有 
lel 条 边 的 图 G, 任 意 去 掉 & 一 1(1<k 所 |el) 条 边 后 ,所 得 的 子 图 仍 连通 ,而 去 掉 上 条 边 后 
的 子 图 不 连通 , 则 称 G Æ k DERE. k 称 作 图 G 的 边 连通 度 , 记 作 e G. 

这 一 节 中 ,我 们 将 给 出 求 图 边 连通 度 的 算法 。 首 先 , 讲 述 一 下 弱 独立 轨 的 概念 ， 

A.B 是 无 向 图 G 的 两 个 顶点 ,我 们 称 从 4 到 妃 的 两 两 尖 公共 进 的 轨 为 共 独 立 轨 (或 
者 说 , AB 是 有 向 图 局 的 两 个 顶点 , 称 从 4 到 B 的 两 两 无 公共 


边 的 有 向 轨 为 有 向 弱 独 立 轨 )。A4 到 B 的 弱 独 立 轨 的 最 大 条 数 。 uL AÀ 
(A 到 BB 的 有 向 二 独 立 轨 的 最 大 条 数 ) 记 作 P' CA BD. e Z ts 
( 注 :O 内 为 有 向 图 的 补充 定义 ,) & A 

例如 ,图 6-17 是 一 个 具有 6 条 边 的 连通 图 ,从 项 点 1 到 项 5 4 
点 4 有 2 条 弱 独 立 轨 , 即 P' (1,4) 一 2，; 图 617 
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(eie; ,88) 
(e, res , €.) 

3] 58:3 (015) 9] JA G3CTRE D 89 ELA H EARRA, E G 图 中 去 掉 , 则 图 不 连通 。 例 
如 去 掉 esee BER eyes* 或 去 掉 eye 等 。 

读者 很 容易 得 出 P' (1,3) 一 P'(5,3) 一 P'(5;4) 二 2, 即 每 两 个 不 相 邻 的 顶点 间 , 都 最 
多 有 2 条 弱 独 立 轨 , 每 轨 任 删 一 条 边 , 亦 会 使 图 G 变 成 不 连通 ,显然 奴 (G) 一 2。 若 连通 图 
G 的 两 两 不 相 邻 硕 点 间 的 最 大 弱 独 立 轨 数 不 尽 相同 , 则 最 小 的 P'(4,B) 值 即 CG)， 

Gy 二 [而 点 数 一 1 G 为 (双向 ) 完全 图 
„min PAB GERM RAM 

那么 ,不 相 邻 的 两 个 顶点 4,8 ARKAA P CA, B B RE RENI S E E 
些 边 ( 被 删 去 边 数 一 忆 (4,B)) 后 使 图 不 连通 呢 ? 我 们 还 是 采用 最 天 流 的 方法 来 解决 这 个 
问题 ; 

1. 构造 一 个 网 络 N 

FG 为 无 向 图 ， 

COD 原 避 图 中 的 每 条 边 e=UV 变 成 重 边 ,再 定向 为 互 为 反 向 ,得 e' 二 UV ,e" —VU ,e' 
的 容量 为 1,e" 的 容量 亦 为 1; 

(2) 以 A HETA: B 为 汇 顶 点 

E G 为 有 向 图 ; 

(1) 原 G 图 中 每 条 弧 的 容量 为 13 

(C) 以 4 为 镍 顶点 ,五 为 汇 顶 点 。 

2. 求 4 和 互 的 最 大 流 卫 

3. 流出 A 的 一 切 弧 的 流量 和 2L FO P'(A,B) ,流出 4 的 流量 为 1 ICA, 


VZ) 组 成 一 个 桥 集 , 在 如 图 中 删 去 这 些 弧 , 则 G 图 变 成 不 连通 。 

ATE P (A,B) 的 算法 基础 ,我 们 不 难得 出 &'(G) 的 求解 思路 ， 

首先 设 如 5G) 的 初始 值 为 co ,然后 分 析 疾 的 每 一 对 顶点 。 如 果 顶 点 AB 不 衫 分 , 则 用 
求 最 大 流 的 方法 得 出 PC4,B) 和 对 应 的 桥 集 。 若 P(A4,B) 为 目前 最 小 , 则 记 当 前 的 & CG)》 
3 P'CA,B) ,保存 其 边 桥 集 ,直至 所 有 不 相 邻 的 顶点 对 分 析 完 为 绰 , 即 可 得 出 图 的 边 连 通 
度 &(G) 和 最 小 桥 集 了 。 

我 们 可 以 从 图 的 边 连通 度 中 引出 一 些 有 趣 的 结论 : 

l. 4 是 有 向 图 G 的 一 个 顶点 , 若 顶点 4 与 G 的 其 它 所 有 顶点 了 间 的 声 (4,Y) 的 最 
MED kB, min PC4Y) 一 和 则 G 中 存在 以 4 为 根 的 上 标 无 公共 边 的 外 向 生成 树 } 

2. 设 G 是 有 向 图 ,0<k 才 上 CG), 工 是 0 至 上 之 间 任 意 一 个 整数 。 对 于 图 GG 的 任 一 对 
顶点 UV 来 说 ,存在 U AV 的 工 条 弱 独 立 有 向 轨 , 同 时 存在 V U Gs kL RRE 
向 轨 


=, 求 图 边 连通 度 的 程序 


program bian. len tong .du; 
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crt; 
const 
maxn = 50; { REMAK } 
type 
edgetype = record ( 网 顶点 类 型 : 容量 ,流量 ) 
cÍ t integer; 
end; 
graphtype =  array[1.. maxn,1.. maxni of edgetype, ( 网 类 型 } 
ltype = array[1..maxn] of integer; { 增 广 罗 类 型 } 
settype 一 set of 1.. maxni 
var 
& + graphtype; (P8) 
|. ft : ltype, { 标号 表 Bl aU er ie) 
st.: way t settype ; i 已 检查 顶点 集合 II } 
rsstsdrbest_s integer 
{ 巴 点 数 ,. 源 点 ,顶点 ， 有 向 、 无 向 标志 ,辅助 变量 } 
Í 1 text; { 文件 变量 } 


procedure init; 
var ij * integer; 
str : string; 
begin 
clrscr, write C filename ='); readlnistr) s 
{《 该 入 文件 名 ,并 与 文件 变量 连 拨 1 
assign ,str) ; reset (I); EER)? 


readin(f ,n), ( 该 入 顶点 数 } 
fillehar(g.sizeof(g) 0); {网 初始 化 } 
readin (f,d), | i ASIE) 
ie 
{ \2 元 向 图 } 
while not eof (f) do { 恋 入 各 统 的 参数 } 
begin 
readln(f 1j? 


gEisiJ.c : =1; 
if d—2 then gLpil e: —1, 1 车 为 无 向 图 , 则 和 托 阵 对 称 } 
end; 
closet(f) ; 
end: 
function min(a,b + integer) + integers ( 返回 ab 间 的 小 者 } 
begin 
if ab then min ! =a 


else min + =b; 


end; 


procedure ford. fulkerson: 
var v,u 1 integer; 
begin 
repeat fillchar(l.sizeof(1) ,00 , ( 增 广 轨 初 始 化 } 
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lfs]: =maxints { 从 s 出 发 搜索 增 广 轨 } 

st* =[]; fts] : =0; 

repeat v : =0; { 搜索 已 标号 但 未 检查 的 顶点 } 
repeat inc(v), 
until (v27n) or (l[v]770) and not <v in st); 


if v< =n then 
EEH v ABIA o RRE U LeMPndoLU 4o Y v» 
begin 
for u : =1 to n do 


证 1[u]==0 then 
if g[v;u]. Ég[vu]. c 


then begin 
llu]: —minclfv];g[v5a]. c—g[ vu. D; 
fiu]: =v; 
end 
else if g[u, v]. {>0 
then begin 
llu]: =gļu:v]. f; 
fk[u] ?1 一 一 V; 
end; 
st + 二 gt 十 [v]， {vv 进入 检查 顶点 集合 } 


end, 
until (yn or ((1]1—20), 
{ 直至 无 增 广 轨 或 改进 量 为 1Lt] 的 增 广 轨 存在 为 止 } 
if 1[c]«77-0 then ( 若 增 广 软 存在 , 则 修改 该 软 上 的 流量 } 
begin 
u! =t; 
repeat if ft[u ]--0 
then gift[u ],u]. £* =glftlu] u]. £+1[t] 


else g[u,abstft[u] ]. f: =gLu -abs (ftu D]. £—1[t2: 


u ! —abstft[u D; 
until ft[u ]—0; 
ená; 
until vn, ( 直至 无 增 广 轨 为 止 } 
end, 


procedure main, 
var i,j kx * integer; 
begin 

k ! —maxint ; 

for s: =1 to n do 
for t: =1 to n do 
if st then 
begin 
fori: =1 tondo (| 流量 初始 化 } 


for j * =1 to n do 


gij]. f£: =0; 
ford fulkerson;, { oK P' (e,t) } 
x35-0, RHEEDE x } 


fori: —1 toa n do 
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inc ,g[.i]. £); 
if x«k then 
{x 汶 自前 最 小 , 则 记 下 目前 最 佳 边 连 通 度 . 源 点 s 和 } 
{ 与 s 相连 的 所 有 流 基 为 1 WIA } 


begin 
kı =X}; 
best_s ! =s; 
way : =[]; 


for i: —1 to n do 
if g[s.i].f—1 then way ! =way+ [i]; 
end, 
end; 
writeln (bian lian tong du : sk); { 打印 边 连 通 度 种 桥 集 } 
for i: =} to n do 
if iin way then writeln('take ' ,best.s.,' — —'.i); 
end; 


begin 
init, ( 输入 图 } 
main; { 计算 并 输出 边 连通 度 和 桥 集 } 


end. 
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第 七 章 匹配 问题 
7.1 匹配 的 基本 概念 


在 1.1 节 引言 中 , 我 们 曾经 讲 计 一 个 飞行 驾驶 员 的 匹配 问题 ,那里 也 介绍 了 “匹配 ” 
这 一 概念 ,这 一 章 就 专门 研究 与 匹配 问题 有 关 的 算法 .首先 让 我 们 把 匹配 的 定义 再 明确 地 
讲 一 下 。 

设 G=[8V ,Ej 是 一 个 元 向 图 ,MGE 是 G 的 若干 条 边 的 集合 ,如果 MM 中 的 任意 两 条 
边 都 没有 公共 的 映 点 ,就 称 M 是 一 个 匹配 。 

例如 图 7-1Ca)、(5) 中 的 粗 线 组 成 的 边 
集合 M 与 M. 分 别 是 图 C, 与 G; 的 匹配 。 

读者 稍 加 分 析 后 便 可 得 出 飞行 员 匹 配 问 
题 的 数学 模型 ， 

从 纵 定 的 图 G=[V ,E51] 的 所 有 匹配 中 ， 
把 包含 边 数 最 多 的 匹配 找 出 来 。 这 种 匹配 即 
所 谓 的 最 大 匹配 问题 。 
图 7-1 根据 图 的 类 型 不 同 ,匹配 问题 也 可 分 为 

两 种 : 


1. 二 分 国药 匹配 

二 分 图 是 这 样 一 种 图 ,G 的 顶点 集合 V. Zr LP REA) X H Y. G 中 每 条 边 的 两 个 端点 
一 定 是 一 个 属于 藉 而 另 一 个 属于 工 。 例 如 飞行 员 分 成 两 部 分 ,一 部 分 是 正 驾驶 员 ,一 部 分 
PISAR. TR. 如何 搭 配 正副 驾驶 员 才 能 使 出 航 飞 机 最 多 的 问题 可 以 归结 为 一 个 二 
分 图 上 的 最 大 匹配 间 题 。 求 二 分 图 最 大 匹配 的 算法 是 以 6. 1 节 中 讲 的 求 网 络 最 大 流 的 方 
法 为 基础 的 。 

2. 任意 图 的 最 大 匹配 

求 任意 图 的 最 大 匹配 5 或 者 二 分 图 的 其 它 形式 的 匹配 ,如 完备 匹配 ,最 佳 匹 配 ) ,是 否 
也 可 归结 成 网 络 问题 来 解决 ? 有 不 少 人 试验 过 ,但 没有 成 功 , 因 此 要 另 找 办 法 。 妈 过 一 些 
数学 家 的 研究 ,发 现 要 解决 上 述 匹 配 问 题 ,必须 先 找 出 一 些 研究 匹配 理论 的 工具 。 下 面 我 
们 将 要 介绍 的 支 错 轨 .可 增 广 轨 . 交 错 树 EER ,就 是 这 样 一 些 工 具 。 

下 面 几 个 定义 ,都 是 相对 于 图 C 的 某 一 个 给 定 的 匹配 M 来 说 的 。 

Hm 

设 Vi 是 图 G 的 一 个 顶点 ,如 果 V; 不 与 任意 一 条 属于 匹配 M 的 边 相关 联 , 就 称 V; 是 
一 个 未 盖 点 。 

拿 图 7-2(4) 中 的 图 与 由 粗 线 组 或 的 匹配 M KRV V V MERER. 

为 什么 下 名 末 盖 点 呢 ? 直观 地 说 ,在 给 定 了 一 个 匹配 M 以 后 ,我 们 可 以 认为 每 一 条 
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图 72 


属于 MUE RETH ES MEE 的 两 个 端点 。 例 图 7-2(a) 中 的 已 盖 住 了 V 与 
VUE, EET V, 与 了 ,等 等 。 而 其 余 顶点 ,也 就 是 没有 被 盖 住 的 顶点 ,自然 就 称 为 未 盖 点 
T. 

交错 轨 

i P EEG 的 一 条 轨 , 如 果 书 的 任意 两 条 相 邻 的 边 一 定 是 一 条 属于 M. 而 另 一 条 不 
属于 ,就 称 卫 是 一 条 交错 罗 .图 7-265),(c) 是 从 图 7-2(e) 中 找 出 来 的 交错 轨 。 顺 便 说 一 
T AURA P 仅 含 一 条 边 , 那 么 无 论 该 边 是 否 属 于 匹配 M,P 一 定 是 一 条 交错 轨 。 

可 增 广 轨 

两 个 端点 都 是 未 盖 点 的 交错 轨 叫 做 可 增 广 轨 。 

拿 图 7-2(5),(c) 中 的 两 条 交错 轨 来 说 , (5) 中 的 那 一 条 轨 的 黄 个 端点 是 未 盖 点 V; 与 
Vn, 因 此 这 条 轨 是 可 增 广 轨 , 而 Cc) 中 的 那 条 交错 胃 不 是 可 增 广 胃 。 另外, 如果 图 中 发 现 了 
两 个 未 盖 点 之 间 仅 会 一 条 边 , 那么 单单 这 一 条 边 就 组 成 了 一 条 可 增 广 轨 了 ,为 什么 ? 因为 
前 面 已 经 说 过 ,单单 这 条 边 就 组 成 一 条 交错 轨 , 再 加 上 它 的 端点 都 是 未 盖 点 ,当然 就 是 一 
条 可 增 广 轨 了 。 

为 什么 要 用 “可 增 广 加 ?这 禅 一 个 名 字 呢 ? 原来 对 于 G 的 一 个 匹 了 M 来 说 ,如 果 能 够 
找到 一 条 可 增 广 轨 , 那 么 这 个 匹配 M 一 定 可 以 通过 下 述 方法 改进 成 一 个 多 包含 一 条 按 的 
匹配 Ms( 即 M 匹配 扩充 了 ); 

把 P 中 原来 属于 匹配 的 边 从 匹配 M 中 去 
掉 ( 粗 边 改 成 细 边 ), 而 把 原来 不 属于 M 的 边 加 
到 匹配 Ms 中 去 ( 细 边 改 成 粗 边 ), 变 化 后 的 匹 
配 Ms 怡 好 比 原 匹 配 M 多 一 条 边 ( 粕 边 比 细 边 
多 一 条 }。 拿 图 7-2(a) 中 的 图 GG 以 及 由 粗 线 组 
(a) 对 图 7. 209] tb》 改进 后 的 匹配 Ms 成 的 匹配 来 说 ,图 7-2(5) 中 已 经 找 出 了 一 条 可 

增 广 和 的 改进 增 广 轨 ,因此 就 可 以 按 刚才 所 述 的 “ 粗 、 细 边 对 
E ors 换 ” 的 办 法 把 原来 的 匹配 改 成 一 个 多 包含 一 条 


边 的 匹配 了 ( 见 图 7-3. 

但 是 我 们 必须 清醒 地 认识 到 ,用 上 述 计算 方法 得 到 的 匹配 Ms 只 不 过 是 具有 “用 在 
可 增 广 轨 上 粗细 边 对 换 的 办 法 不 能 再 改进 了 ”这样 的 特点 ， 而 这 个 特点 不 一 定 能 保证 它 
是 最 大 匹配 。 判 断 一 个 匹配 是 否 是 最 大 匹配 的 标准 只 有 一 条 : 
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若 匹配 M 中 不 存在 可 增 广 轨 , 那 末 M 一 定 是 最 大 匹配 。 

那么 如 何在 匹配 中 找 可 增 广 轨 呢 ? 曾 有 人 提出 这 样 一 种 方法 : 

对 于 图 G 的 一 个 给 定 的 匹配 M 来 说 ,首先 看 看 有 几 个 未 盖 点 ,如 果 没 有 未 盖 点 或 者 
只 有 一 个 未 盖 点 ,就 不 用 找 了 ,肯定 不 会 有 可 增 广 轨 ，, 即 MERKEA., WRR EA 
一 个 ,就 任意 取 定 一 个 未 盖 点 Vi, 然后 从 V; 出 发 ,用 回潮 法 搜索 以 , 为首 的 交错 贺 。 如 果 
搜索 了 所 有 可 能 情况 后 还 来 发 现 一 条 以 另 一 个 未 盖 点 为 尾 的 交错 轨 ， 则 再 取 一 个 未 盖 点 
Vi 进行 回 湖 搜索 ……，, 直 至 找 出 一 条 可 增 广 轨 或 者 对 于 所 有 未 盖 点 来 说 ， 都 不 存在 一 条 
以 它 为 一 端的 可 增 广 轨 为 止 。 

很 显然 ,如 果 迁 到 一 个 比较 复杂 的 图 ,这 种 方法 是 很 难 用 的 。 这 种 方法 的 主要 缺点 ， 
在 于 搜索 时 太 不 系统 ,有 些 边 和 顶点 在 回 戎 时 往往 反复 走 过 好 几 次 。 为 了 克服 搜索 不 够 
系统 这 一 缺点 ,并 且 设 计 一 种 系统 搜索 可 增 广 轨 的 方法 ,我 们 还 需要 介绍 儿 个 概念 : 

i& M 是 图 避 的 一 个 匹配 ,V,; 是 取 定 的 未 盖 点 ,如 果 存 在 着 V. 与 另 一 顶点 w 的 交错 
路 ,就 称 由 V 交错 可 达 V/( 亦 可 认为 V 交错 可 达 V; 本 身 ) 

以 图 7-3(0) 为 例 , 如 果 我 们 取 定 了 未 盖 点 了 ,那么 因为 存在 着 交替 加 

P={V, Vy ViVa} 

因此 由 V, ERE Vo, 当 然 , 由 VV 也 交替 可 达 V, 因为 P 中 从 ,到 VV 这 一 段 也 
是 交错 轨 , 不 难看 出 ,由 V 还 交错 可 达 V; 与 Vo。 

有 了 交错 可 达 的 定义 ,我 们 可 以 看 出 ,如 果 发 现 一 个 未 盖 点 Vi， 而 由 Vi 又 交错 可 达 
VY，, 我 们 就 找到 了 一 条 连接 V. 与 的 交错 轨 , 也 是 就 是 一 条 可 增 广 胃 了。 因此 , 要 想 找 
以 Vi 为 一 端的 可 增 广 轨 ,可 以 用 下 面 的 方法 :设法 把 由 Vi; 交错 可 达 的 顶点 一 个 一 个 地 
技 出 来 ,每 找到 一 个 ,就 检查 一 下 它 是 不 是 未 盖 点 ,是 的 话 ,可 增 广 轨 就 找到 了 。 如果 已 经 
把 所 有 由 V 交错 可 达 的 项 点 都 找 出 来 ,而 其 中 没有 一 个 是 未 盖 点 ,就 可 以 肯定 以 V; 为 一 
端的 可 增 广 轨 一 定 不 存在 了 。 

为 了 把 由 V. 交错 可 达 的 顶点 都 找 出 来 ,还 要 用 到 一 个 交错 树 的 概念 : 

d M 是 图 G=[V.,E] 的 一 个 取 定 的 匹配 ,T 是 图 G 的 一 个 子 转 ,如果 了 具有 下 述 性 


(OD T E —"Tr B 

(2) T 中 存在 一 个 顶点 Vo Rok s 

(3) 对 于 了 的 任意 一 个 不 同 于 V; 的 顶点 来 说 ， 
T 中 连接 V, 5 V, 的 唯一 轨 是 交错 轨 ， 

那么 称 了 是 一 个 以 V, 为 根 的 交错 树 。 

以 图 ?-4(a) 中 的 图 G 为 例 ( 粗 边 代表 一 个 区 
配 ) ,图 7-4( 思 中 的 子 图 T 就 是 一 个 以 Y, 为 根 的 交 ac 
错 树 。 

由 交错 树 的 定义 (3), 不 难看 出 :交错 树 上 的 顶 图 7 
点 Vi 都 是 由 V. 交错 可 达 的 顶点 。 另外 ,要 具体 地 把 连接 V, 58 V. 的 交错 轨 找 出 来 也 不 
难 ,因为 在 T 中 ,连接 V; 与 V ;的 轨 是 唯一 的 ,而 由 交错 树 的 定义 (3) ,这 条 轨 就 是 要 找 的 
交错 办 。 
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因此 , 想 要 把 由 V; 交错 可 达 的 顶点 都 找 出 来 ,可 以 采用 不 断 扩大 交错 树 的 办 法 ,图 G 
开始 时 , 令 交 错 树 全 只 合 一 个 顶点 ,就 是 取 定 的 未 盖 点 V;,V; 是 了 的 根 , 以 后 逐步 扩大 
T ,每 扩大 一 次 , 中 新 增加 的 顶点 就 是 新 找到 的 由 V; 交错 可 达 的 顶点 。 

为 了 讲 怎样 扩大 一 个 交错 树 ,还 要 介绍 一 个 有 关 顶 点 分 类 的 概念 。 

T 的 顶点 可 以 分 成 两 类 : 

一 类 叫 外 点 ( 即 图 7-400 中标: 十 "的 顶点) 。 如 果 V; 是 外 点 ,连接 根 V 与 V; 的 交错 
路 P 一定 售 偶数 条 边 , 且 了 上 与 V; 关联 的 边 一 定 属于 匹配 M. 

一 类 叫 内 点 ( 即 图 7-4 (0) 中 标 ' 一 ' 的 顶点 )。 如 果 V, 是 内 点 ,连接 根 了 , 与 VV, 的 交错 
E PERERA, HEP 上 与 Vj 关联 的 边 不 属于 匹配 M。 

有 了 以 上 的 准备 ,就 可 以 讲 扩大 一 个 以 V; 为 根 的 交错 树 的 办 法 了 。 就 是 ; 

看 看 图 G 中 有 没有 与 交错 树 了 的 外 点 关联 而 不 属于 了 的 边 E, WRA. 就 再 看 看 上 
的 V, 另 一 个 端点 Vi 是 不 是 属于 了 ,如 果 TV 不 属于 了 ,就 可 以 把 天 和 Vi 都 加 到 他 中 去 ， 
使 了 扩大 。 有 具体 扩大 的 时 候 , 还 可 以 分 两 种 情况 ， 

1. V, 是 未 盖 点 ;这 时 ,把 互 与 VV 加 到 荆 中 去 后 ,T PERR V 与 Vi 的 交错 路 是 一 
条 可 增 广 轨 ( 见 图 7-500); 

2. Vi 不 是 未 兽 点 ,也 就 是 说 ,有 一 条 属于 匹配 M 的 边 E' 与 Vi 关联 ,这 时 ,在 把 碧 与 
加 到 了 中 去 ,接着 还 可 以 把 所 以 及 它 的 端点 加 到 工 中 去 ,因为 很 显然 从 Vi 边 也 交错 可 达 
的 另 一 个 端点 Vi。 另外 ,还 容易 看 出 ,Vi 应 该 是 内 点 ,而 Và 是 外 点 ( 见 图 7-502). 


7-5 


针对 图 7-4(c) 中 的 图 G, 图 7-6(a)， cz)，(e) 给 出 了 怎样 用 上 述 方法 扩展 交 
错 树 的 具体 过 程 ， 


十 ve iv, Y $y; v, s. SVs 
à gi "oz Ls E z” +a > "m 
y Fz s Vs Vs $ Va un 
(a) o (e) (4) (e 
图 7-6 


对 于 图 7-6(e) 中 的 交错 树 , 不 能 再 用 上 述 方法 扩大 了 ,因为 找 不 到 一 条 不 属于 了 工 的 
HE RAWS T 的 某 外 点 关联 , 且 互 的 另 一 端点 Te 也 不 属于 了 。 但 是 能 不 能 就 此 断定 
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以 V, 为 一 端的 可 增 广 轨 一 定 不 存在 呢 ? 还 不 能 。 事实 上 ,以 VY, 为 一 端的 可 增 广 轨 是 存在 
的 。 图 7-ACO LEER ELI CVV, V, Vo Vo Vo VS V 就 是 一 条 连接 VV 5 V, 的 可 增 
广 轨 。 

在 求 任意 图 的 最 大 匹配 的 过 程 中 ,上 述 情 况 经 常 出 现 。 为 了 求 得 可 增 广 轨 ,还 需要 一 
个 重要 的 概念 一 一 带 花 树 。 

什么 是 带 花 树 ,就 是 如 果 发 现 了 一 条 不 属于 交错 树 了 Buy EE 的 两 个 端点 都 是 了 
的 外 点 ,那么 把 E 加 到 个 中 去 得 到 的 图 叫做 带 花 树 。 

带 花 树 的 特点 是 , 它 恰 好 有 一 个 图 ,今后 我 们 就 把 这 了 唯一 的 图 叫做 花 。 请 大 家 记 住 ， 
花 就 是 一 个 团 , 回 内 包含 奇数 条 边 。 

例如 图 7-6(e) 中 ,连接 人 了 的 两 个 顶点 V; 与 了 ,这 条 边 原 不 属于 了 ， 现在 把 E 加 到 全 
中 去 ,只 不 过 是 使 了 增加 了 一 条 边 ,没有 扩大 由 VV; 交错 可 达 的 顶点 的 范围 , 反而 使 得 了 
不 再 是 树 了 。 这 样 敌 ,又 有 什么 用 呢 ? 我 们 把 这 个 问题 留 在 “7, 5 求 任意 图 的 最 大 匹配 "一 
节 中 解决 。 


7.2 求 二 分 图 的 最 大 匹配 


—. 问题 及 其 分 析 


求 二 分 图 的 最 大 匹配 的 算法 是 以 “6. 1 求 网 络 的 最 大 流 ” 一 节 中 所 述 的 方法 为 基础 
的 。 
1. 从 二 分 图 G 出 发 构造 一 个 网 络 石 
(D 增加 一 个 源 点 S 和 一 个 源 点 工 ， 
(D 从 3 向 X 的 每 一 个 顶点 都 画 一 条 有 向 弧 , 从 Y 的 每 一 个 顶点 都 向 了 画 一 条 有 
BEY 
(3) 原来 G 中 的 边 都 改 成 有 向 驱 , 方 向 是 从 X 顶点 指向 Y 的 顶点 ， 
(4) 令 所 有 弧 的 容量 都 等 于 1( 见 图 7-7)。 
2. RART HRKI F. x 


lo QN 
ZNL 

3. 从 天 的 顶点 指向 了 的 顶点 的 驳 集 中 , 弧 流 量 为 1 的 anos 
统 对 应 二 分 图 的 匹配 边 ,最 大 流 值 对 应 二 分 图 的 最 大 匹配 NEIN 
的 边 数 。 LL 

当 我 们 对 二 分 图 G 进行 “覆盖 ”的 分 析 后 ,会 引出 一 个 有 最 大 匹配 
e ib. 7-7 

最 大 匹配 的 边 数 等 于 G 的 覆盖 数 a(G)。 
二 , 程序 

下 面 给 出 程序 题解 。 


program maxtnatch} 


{ 最 大 匹配 } 
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const 
MaxN = 30; 


type 
nodetype = record { 可 增 广 轨 的 顶点 类 型 ,标号 ,检查 标志 } 
1, p: integer, 
end: 
arctype = record ( 网 顶点 类 型 . 容量 ,流量 } 


c+ £; integer; 


end; 

gtype = array [1..maxn, 1.. maxn] of erctype, { [3578 ) 

ltype = array [0.. maxn.] of nodetype: CHHÉJ BERE) 
vat 


lt: type; { HDI) 
E: gtypes (网 } 
n: sy ta nl, n2: integers ( 顶点 数 . 尖 点 . 汇 点 ,lx|、|y| } 


procedure readgraph; 
var 
8: string; 
i, J: integer; 
Í: text; 
begin 
write(' Graph filename > '); { 恋人 文件 和 名 并 与 文件 变 基 连接 } 
readin(a) ; 


assign(f, s); 


reset (P; { 读 准 备 } 

readin (f, n1, n2); CBE [xiflv|? 

n = nl-Fn24-2; CERE N 网 的 顶点 数 } 

fillehar(g, sizeof(g), 0); { N 网 和 可 增 广 轨 初始 化 } 

fillchar (lt, aizeof (lt), 0); { 从 向 x 的 每 一 顶点 引出 容量 为 1 的 有 向 张 } 


fori := 2 to nl+1 do gfl,il,c ;= 1; 
{ 从 y 的 每 一 优点 向 t 引出 容量 为 1 的 有 向 弧 } 
for i :一 2 十 al to n—1 do gli, nl.c 1= 1; 
{ 原 二 分 图 的 边 改 为 从 x 的 顶点 指向 7 ARAA EAN } 
for i := 1 to nl do 
{or j :— 1 to nZ do 
read (f, g[1+i, 1--n14-j]. 2: 
close lf); 
end; 


function check; integer; { 返回 一 个 已 标号 而 未 检查 的 顶点 序号 } 
var 
i; integer; 
begin 
i := l; 
while (i< =n} and not Ct[i]. 1«2770) and Clt[i]. p—02) do inc(0; 
if >n then 


check :三 D 
else 
check ,= i; 
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end; 


function ford(var a: integer): boolean; 
{ s 顶点 至 t 顶点 无 可 增 广 胃 返回 crue ,否则 返回 false 和 可 增 广 轨 的 改进 量 a } 
var 
is js m» X: integers 
begin 
ford := True; 
fillchar(lt, sizeof (t), 00, ( REPETIT 97 
It[8].1 := s; 
' repeat 
i :二 check, { 寻找 一 个 已 标号 而 未 检查 的 项 点 序号 i } 
ifi = 0 then Exit: ( 车 该 顶点 不 存在 , 则 退出 过 程 ,返回 true } 
for j := 1 to n do 
if c5]. E02 and (Gi, j e<>0) or (gb, 1]. c<>0)) then 
( HEB 5 TRS LE BE ELO EH IE TIE Ki j> ER 81A k M 2 


begin 
if (gl, 3]. f g[1, j]. c) then It[i].1 ;= i; 
if (gO, i]. £2700 then It 3].1 := 一 计 
end; 


bli]. p := 1，{ 顶点 i 的 所 有 相关 弧 分 析 完 ,置顶 点 i 检查 标志 
until (t[t]1. 1:270), ( 循环 ,直至 t 顶点 标号 为 止 } 
m :二 ts { 从 顶点 t 倒 推 , 改 进 量 初始 化 } 
a :一 MaxInt3 
repeat ( Ra = min [AMAWA CGF MAAM FG] } 
]:= m; 
m := abs(lt[j]. D: 
if H[j]. 1«0 then x := g0, m]. f; 
if lt[j]. 1>0 then x := gim, j]. c—g[m, j]. f; 


if ax then a := x1 
until m = 8; { 直至 倒 推 至 顶点 s 为 止 } 
ford := False, { 返回 可 增 广 轨 存在 标志 false } 
end; 
procedure fulkerson(a. integer); 
var 
mM, jı integer; 
begin 
m := t; { 从 上 + 顶点 出 发 , 沿 增 广 轨 修 正 流量 } 
repeat 
ji ms 


m := abst]. D: 
if It[j]. 10 then gD, m]. f := gO» m). f—a; 
if It[j]. 1270 then gim, jJ. £ 1= gm, j]. £2; 
until m = 8; 
end; 


procedure answer; ( 打印 从 x 的 顶点 指 疝 y 的 顶点 的 弦 集 中 流量 为 1 的 匹配 边 } 
var 

i, j: integer; 
begin 
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fori := 2 to n—1 do 
' for j := 2 to n— 1 do 
if gi, j]. £—1 then writeln(i—1, '7—-———— f, j—ol—1); 
end, 


procedure proceed ; 
var 


del, integer; 
success; boolean; 
begin 
s :二 1; )ONTGUNIDR } 
fin, 
repeat 
success :一 ford (del); 1 FRES Sus E del ) 
if success then { 若 可 增 广 轨 不 存在 ,打印 最 大 匹配 } 
answer 
eise 
fulkerson(del) ; AWRA S ERE } 
until success y 
end; 
begin 


readgraph, | 读 和 人 二 分 图 ,构造 人 网 } 
proceed; {LR N 网 的 最 大 流 得 出 二 分 图 的 最 大 匹配 } 


end. 


7.3 求 二 分 图 的 完备 匹配 


一 、 分 工 问题 和 求 二 分 罚 的 完备 匹配 


某 公司 有 工作 人 员 Xi, 六，，*** 人 Ys 他 们 去 做 工作 Yi Yos Ys 每 人 适合 做 其 中 的 
一 项 或 几 项 工作 , 问 能 否 每 人 都 分 配 一 项 合适 的 工作 ， 

这 个 问题 的 数学 模型 是 :构造 一 个 二 分 图 G, 顶 点 划分 为 两 个 部 分 : 一 个 是 工作 人 员 
集合 X= {X » Cm Xu) ,一 个 是 工作 集合 Y= (Yi DETLL Yu) 当 且 仅 当 Xi 适合 干 工作 
Y, 时,X; 与 Y; 之 间 连 一 条 边 。 问 是 否 能 从 G 中 得 出 一 个 不 会 未 盖 点 的 匹配 ,这 种 将 G 的 
每 一 个 顶点 盖 住 的 匹配 称 为 二 分 图 的 完备 匹配 。 

可 能 存在 完备 匹配 的 图 是 否 仅 限于 二 分 图 呢 ? 答案 是 符 定 的 。 数 学 家 在 做 了 大 量 的 
图 论 分 析 后 得 出 : 

(D G Æ KOC» 0) IER ZAM: 

(2) G 是 无 桥 的 三 次 正则 图 ， 

《3) G 在 去 除 任意 一 个 项 点 子 集 S 后 ,其 子 图 中 含 顶点 数 为 奇数 的 连通 分 支 个 数 不 
KFIS. 

具有 上 述 3 个 特征 的 图 肯定 有 完备 匹配 。 特 别 是 特征 (3), 是 完备 匹配 的 充分 必要 条 
件 :会 特征 (3) 的 图 一 定 有 完备 匹配 ;有 完备 匹配 的 图 也 一 定 含有 特征 (3)。 

圩 面 介绍 一 种 求 二 分 图 最 佳 匹配 的 算法 一 一 铝 牙 利 算法 。 
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变量 说 明 : 
S 一 一 外 点 集合 ,初始 时 为 交错 树 的 根 ; 
了 一 一 内 点 集合 ,初始 时 为 空 ; 
NS3) 一 一 与 $ 中 的 顶点 相 邻 的 顶点 集合 。 显然 , 若 NOGOST, 表 胡 与 任 一 外 点 相连 
的 端点 都 在 内 点 集合 里 , 找 不 出 一 条 不 属于 交错 树 的 边 , 图 G 无 完备 匹 
B 
对 一 一 匹配 按 集 合 ; 
ECP) — [H7 8 P Eni. 
MOE(P) — ETT SEXE RES ARR up LP 上 的 匹配 边 与 非 蔬 配 边 对 换 ， 
P 轨 外 的 匹配 边 不 变 , 使 得 M 改进 成 一 个 多 包含 一 条 边 的 匹配 。 


N48 破 任 取 一 个 初始 相配 
POL N 
4 | 
JAX d —4- dei RUM ae WERE MYRAN, 
i 


S-—(40U) Tep, end 


i 
ING n] 
LY 
PATAMAR AAAY ENTI 无 完备 匹配 
i ' } 
YZ lu ücin end 
| 


Y 
点 进入 TT 集合; 取 可 增 广 轨 PIU ,站 ); 
MMO ECP), 


Z 顶 点 进入 人 5 集合 ， 


这 个 算法 的 要 点 是 把 初始 匹配 通过 可 增 广 轨 逐次 增 广 , 以 至 得 到 最 大 匹配 ,然后 根据 
有 无 未 盖 点 来 判定 这 个 最 大 匹配 是 和 否 为 完备 匹配 。 

例如 求 图 7-8(a7 中 的 最 大 匹配 , 设 初始 匹配 M= {XY XY. XY. 

ARAA X, 为 和 根 ,生成 交错 树 ,结果 得 到 可 增 广 轨 YX ALE 7-8C6))。 


Y 
X X X X X x, D ; 
Y . . 
N TA Y Y; Y: Ys X X 

5 X 5 Xx X 


Y X Y, 5X» XY 


7-8(a) 图 7-B(» 
通过 可 增 广 轨 把 3a3 pm M={XY, XY, Áo 94471698: 7-8Cc25, 
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URAA X, 为 根 ,生成 交错 树 ( 见 图 7-8(4d))。 


X 区 为 X X m a A ^X 
Yz 
x X 5 Y, X Ys 
hG % ^ a X X 
HD 7-8(c) 图 78D 
结果 未 得 到 可 增 广 轨 , 可见 M. 是 最 大 匹配 ,无 完备 匹配 
二 、 求 二 分 图 完备 匹配 的 程序 
program bestmatch,; 
{ 完备 匹配 } 
const 
maxn = 30i 
type 
graphtype — array [1.. maxn, 1.. maxn ] of integer; ( 图 类 型 } 
settype = set of 1.. maxn; 
var 
g: GraphType, {《 二 分 图 } 
m, n: integer; t dy Hf Ix!) 
as f» Cx» Cy: SetType; { 外 点 集合, 内 点 集 台 ,已 匹配 的 x 集合 ,已 匹配 的 y 集合 } 
found; boolean; Bor qun wr p } l 


procedure readgraph; 
var 
i, j: integer; 
st: string; 
Í: text; 
begin 
writeC Graph filename = '2; ( 读 入 文件 名 并 与 文件 变量 连接 } 
readin(st) , 
assign (i, at), 


reset (Í); REA } 
readln{{, n, m); { 读 六 jx 和 | 
fori := ltondo { 读 入 二 分 图 } 
for j : — 1 to m do 
read (f, gli, jD); 
close(D; 
end: 


function pathtx: integer): boolean; 
{ 若 扩展 出 以 x oer HHRH x 为 宰 的 交错 树 , 则 返回 true; 否 则 返回 false } 
var 
i; jı integer: 
begin 
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path ;— false; 
fori ;— 1 to m do 
if not (i in t) and (g[x, 1]-770) then 
(EUNBRRERBxEXidÓn) 
begin 
tam tK [i] { 则 1 进入 内 点 集合 ,并 分 析 : } 
if not (i in cy) then 
{ 车 i 是 y 集合 中 的 未 盖 点 , xc ACRA i 进入 已 匹配 的 y 集合 , 返回 true ) 
begin 
glx, i] := ~—g[x: i]; 
cy := ey [i] 
path := true; 
exit y 
end; 
j:= l; 
while (j« —:m? and not (j in s) and (g[j. iJ>=0) do ine (j); 
if jm then ( 车 <j,i>> 是 匹配 边 , 则 j 进 入 外 点 集合 } 


begin 
8 ;三 s+ [i]: 
if path ) then { 车 从 i 出 发 递归 扩展 出 交错 料 I 


begin — ( 则 可 增 广 轨 的 匹配 这 与 非 匹 配 边 对 换 , 并 返回 true } 
gix. i] := ~—g[x, i]i 
gli» i] := —gDi id: 
path := true: 
exit; 
end; 
end; 
end; 
end; 
procedure main: 


var 
us is j: Integer; 


begin 
found := true; 
U 4 一 1; 
cx :一 L]; { 已 匹配 的 x 集合 和 y 集合 设 空 } 
cy := []; 
while u< =n do 
begin 
s 1— [u]; { 取 u 作 外 点 :内 点 集合 设 空 》 
Tt :一 Ls 
if not (u in cx) then ( # u 是 x 和 集合 中 的 未 盖 点 } 
begin 
if not path(u) then ( 若 扩展 不 出 以 为 根 的 交错 树 , 则 无 完备 匹配 } 
begin 


writeln(^ No answer. }; 
found ;= false; 
exit; 
end 
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else cx :一 ex--[u]i { PREL u 为 根 的 交错 树 ,u 进入 已 匹配 的 x 集合} 
u= 04 
end ; 
inclu); LJ x SG "PHRCTE — Tro XU o 作 交错 树 根 } 
end; 


end; 
procedure print; ( 打印 完备 还 配 } 


var 


i, ji integer, 


begin 

fori := 1 to n do 

for j := 1 to m do 
writeln(i, ' — ———', pi 

end; 
begin 

readgraph : { 读 入 二 分 图 } 

main; { 求 完 备 匹 配 } 

if found then print; { 车 存在 完备 匹配 , 则 打印 结果 } 
end. 

7.4 求 二 分 图 的 最 佳 匹 配 
一 、 问题 及 其 算法 


在 7. 3 节 例 举 的 分 工 问 题 中 ,工作 人 员 可 以 做 的 各 项 工作 ,效益 未 必 一 致 ,我 们 需要 
制定 一 个 分 工 方案 ,使 公司 的 总 效益 最 大 ,这 就 是 所 谓 最 佳 分 配 问 题 . 它 的 数学 模型 如 下 : 
G 是 加 权 完 全 二 分 图 ;顶点 划分 为 两 个 集合 X,Y; X= (X, »€ y*t* (X. } 了 = (Yi Y, 9 
e Ynje WX YDS 是 工作 大 员 X; MY, TERHES Sn 1 sum) KRAK 
817548 VEG ,这 种 完备 匹配 称 为 最 佳 匹 配 。 
若 用 穷 举 法 ,需要 对 n! 个 完 关 匹配 进行 比较 , 当 ” 较 大 时 ,计算 量 过 大 , 是 不 可 能 很 
快 得 到 结果 的 .本 节 给 出 一 种 有 效 算 法 ,为 此 ,我 们 首先 引入 一 些 概念 ,作为 本 节 中 心算 法 
的 基础 。 
1. 工分 图 G 的 可 行 顶 标 LGO 
对 于 蕊 集合 中 的 任 一 项 点 z Y 集 含 中 的 任 一 顶点 RATE 
LEID LOW Gy) 
Jur LGOX G 的 可 行 顶 标 。 这 个 可 行 顶 慰 是 存在 的 ,例如 初始 时 可 设 
Lr) = maxW (xy) r€xXx 
L(y) —0 y€Y 
2， 相 等 子 图 G: 
HUR E= {xy | xy€ E WHR E, LHL —W Go) HEURE] G ERTE, 
称 作 相 等 子 图 , 记 为 Ci。 
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为 什么 我 们 要 给 出 上 述 两 个 概念 ,原因 是 欲求 二 分 图 G 的 最 佳 匹 配 , 只 需 用 匈牙利 
算法 求 取 相 等 子 图 Gi 的 完备 匹配 , 即 为 G 的 最 佳 匹配 ,但 问题 是 , 当 Gz 中 无 完备 匹配 时 
怎么 办 ,下 述 算法 给 出 修改 顶 标 药 一 个 方法 ,使 新 的 相等 子 图 的 最 大 匹配 逐渐 扩大 ， 最 后 


出 现 相 等 子 图 的 完备 匹配 。 
变量 说 明 ， 
了 一 一 可 行 顶 标 集合 ; 
了 一 一 收 改 后 的 顶 标 集合 ; 
Gi 一 一 修改 顶 标 后 的 相等 子 图 ; 
4: 一 一 顶 标的 改进 量 ; 
5 一 一 Gz 的 匹配 中 ,外 点 的 集合 ,初始 时 为 交错 树 的 根 ; 


7 一 一 必 的 匹配 中 ,内 点 的 集合 ,初始 时 为 空 ; 

Na C65) G,'h S 相 邻 的 顶点 集合 。 显 然 , 若 Na GO-T, G 无 完备 匹配 。 
M,.ECP) 和 对 称 差 运算 MOECP) 的 意义 如 完备 匹配 算法 。 

下 面 给 出 求 二 分 图 的 最 佳 区 防 的 算法 流程 ; 


选 定 初始 的 可 行 项 标 工 ， 
Liz) = maxW (zy) , r€x 
L(y) —0 yEY 
HE Gi: 


MORC EL A DEEE; 


XAk& dr M N 
ix 
Jte — 1 ef TEMERE R MAREE 
St) 了 < 一 省 END 


' 
Nor S) 5M 


A= min (LG) HEC) —W (zy) 
N L()—A,, wuES 
1607] Lat, uaET 
| 
取 不 周 于 当前 空 销 树 的 一 个 顶点 yE€ Nor (3) 
疙 是 匹配 边 一、 
(x | 


2 巴 点 进入 S$ 集合 iy 顶 点 进入 T 集 合 ! —OXRGLIP—THMISRDNU UPS) 
MMO EG? 


v]: 已 知 Ks HERH 
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apa s os 40r 
X; 2 2 0 2 23 
G—X4| 2 4 4 1 0 
Xl 0 1 1 0 0 
Xl 1 2 1 3 3 
求 最 佳 匹配 ,其 中 下 ;, 的 顶点 划分 为 关 = {人 Xi} ,Y= {Yi} ,i 二 1. ,5。 
我 们 利用 上 述 算法 求解 : 
l. 取 初始 的 可 行 顶 标志 (x) 为 ， 
L(G2-0  i-l,2;.,5 
LG) —maxí3,5,5,4,1] —5 LO (0,1,1,0,00—1 
LX) -max(2,2,0,2,2) —2 L(X—(1,2,1,3,32—3 


L(X —max12,4,4,1,0) —4 
2. WE C, 及 其 上 的 一 个 初始 匹配 M= {XYXYXY XY) ORBI 7-900). 
3. 以 u-—X, 为 根 , 求 交错 树 , 得 S= {XXa „Xa? ‘T= (Y; Yi c Nal =T, FE 
A= min (Li) + Liy) — W(lrzy)} =1 


修改 顶 标 ， 
I(X)—4; IQ-0; 
HO DETTE I(Y)=1; 
IQ) =33 KYD=1; 
IKX)=0; IŒ.) =0; 
IX)2-8; IQ)-0 


4. FB UR B TUER IB G 及 其 上 面 的 一 个 完备 匹配 。 
图 7-9(5) 中 和 粗 实 线 给 出 了 一 个 最 佳 匹配 ,其 最 大 权 是 2 十 4 十 1 十 4 十 3 二 14。 


X; X X9 X X & X X A X 


1 
Y Y; Y Y. Y Xa X, Y» Y Y 


(a) o» 
图 7-9 


由 上 可 以 看 出 :44>03 修 改 后 的 顶 标 仍 是 可 行 顶 标 ;Gi 中 仍 会 Gi 中 的 匹配 MG 中 
至 少 会 出 现 不 属于 M 的 一 条 边 , 所 以 会 造成 MM 的 逐渐 增 广 。 


二 , 求 二 分 图 最 佳 匹配 的 程序 


program kuhn-munkras -algorithm ; 
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{ 最 佳 匹配 程序 } 


const 
maxn = 304 
type 
gtype = array [1.. maxn,1. . maxn] of integer; 二 分 图 类 型 } 
ltype = array [1.. maxa | of integer, { 顶 标 类 型 ) 
settype = set pf 1. .maxn; 
var 
nm 1 integer; { LIzl 7 有 
gge ， ByDe: (8 GE RER } 
1 ; ltype; (PI GEMA 1 
f 1 text; { 文件 变量 } 
E> CY settype; 


{ 已 检查 的 x 集合 ,已 检查 的 y 集合 ,已 匹配 的 x 集合 ,已 匹配 的 y 集合 》 


procedure read—graph; 

var 
str string; 
isjiinteger; 

begin 
write Graph file = 0; { 读 入 交 件 名 ;并 与 文件 变量 连接 } 
readln (str) ; 
assign (f str): 
reset (D; 
readin(£ ,n m) y { 读 入 |x| 和 各 |y| } 
fori: 一 1 to n do B ZWEI 做 六 工作 的 效益 } 

for 311 to m do read(f,gl i.i; 

closeC£2, 

end; 


function path(x :integer) ; boolean: 
COR x RII. EAE MWA S Ce es 53: B IMS } 
var 
isj:integer; 
begin 
path: =false; 
for i:=1 to m do 
if not (i in t) and (g[x,i]« 00 { # ig CREG y SEO IHOGGDEE! 
then begin (i XEA CUERO y 46) 
ti: 一 t 十 [i]; 
if not (i in cv? 
(SE i& BGOUBEÉ y Ser xu EE) 
{ 进入 已 匹配 的 了 集合 ,返回 true ) 
then begin 
gii]: =- glai] cy: —cy- lil 
path : = true ;exit 
end; 
jl: 
{与 x 相 邻 的 顶点 i 已 匹配 ,搜索 一 条 已 1 
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{ EMAS Ga BREH RA) } 
while (j<=m) and not (j in s) and (g(j.i]7» —0) do inet); 
if j—m 
then begin 
s,—sc[ih 1 顶点 进入 已 检查 的 x 集合 } 
if path (j) { 著 j 出 发 存在 增 广 轨 } 
then begin 
gboi]:;— —gbxiligliin1——a Di]: 
( 则 增 广 轨 的 亚 配 边 与 非 匹配 边 对 换 } 
path: —true;exit 
end 
end 
end 
end; 


procedure kuhn—munkras; 
var 
u,i,j,al:iinteger: 
begin 
fillehar(l,sizeof (12,025 ( 可 行 顶 标 初始 化 } 
gt: =; 
for i:=1 to n do { 求 可 行 顶 标 lOu) =maxlw (x, ,yi)》 } 
for j:=1 to m do ( yi€ y t 
if Ii] gj] then lG]: =gtLisi]; 
ur=l;cx:=[];cy: =C]; { 已 匹配 的 x MARGA y 项 点 集合 初始 化 } 
for i: —1 to n do GRO) 
for j: 一 1 to m do 
if 1i ]--n-11— gt(i.i] 
then g[i.j]:—1 
else glisj]:=0; 
while u< =n do 
begin 
3:1—[u]iti-[]: 
if not (u in ex) ( # u 不 属于 亚 配 的 x 顶点 集合 } 
then begin 
if not pathtu) ( 若 揽 不 到 从 出 发 的 一 条 可 增 广 轨 } 
then begin 
al: —maxint; 
{ R a= min í lix)+iy)— wiry) } 
{ ! 
for i;—1 to n do 
for j17-1 to m do 
if Ci in s) and not (j in t) 
and G[i]--t[n -j]—gt[i. i] aD 
then al, —[i]--1[n--j]—gt[1.i]; 
{ 修改 顶 标 , 形 成 Gr 
for i; —1 to n do if i in s then I[1]; —1[1j— al; 
for i:=1 to m do if i in t then l[n-i]: —l[n4- i]--al; 
for i;—1 to n do ( Gi—G)! 
far j:—1 to m do 
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i£ 工 可 十 in 十 条 一 gt 条 
then g[i,j]:—1 
else g[i,j]: —0; 
exi []iey :—[] 
end | then } 
else cx, —ex--[u]; { u XEA ELEEBLUS HARR? 
nu;—0 
endi { then } 
inc(u) { 从 下 一 顶点 开始 搜索 } 
end 


end; 
procedure prints | 打印 最 佳 分 配 } 
var 


isjstot :integer; 


begin 
tot: —0; 
for i: —1 to n do 


for j|. —1 to m do 
(ES iT ABESSE j 项 工作 (工作 效益 为 eiD. WiTH } 
H g[i,j]«0 
then begin 
writeln G,’ ——' +j) itot: =tot+gtli»i] 
end; 
writeln( Tot = ' tot) 
end; 
begin 
read graph; 《 读 入 二 分 图 } 
kuhn-munkras, ( KEELE } 
print { 打印 结果 } 


end. 


7.5 求 任意 图 的 最 大 匹配 


一 、 问题 及 其 分 析 


在 “7. 1 忽 配 的 基本 概念 ”一 节 中 曾 讲 过 : 在 扩展 以 V 为 根 的 交错 树 了 的 一 个 外 点 
Vj 时 ,车 找 不 到 一 条 不 属于 工 MAV VORP V ULT TO, WEG PIRA -R 
不 属于 工 且 连接 本 上 两 个 外 点 的 边 E。 若 这 样 的 边 E 处 存在 , 则 断定 以 Y; 为 一 端的 可 
增 广 轨 一 定 不 存在 ;否则 ,将 E 加 到 关中 ,使 工 成 为 一 个 带 花 的 树 ,这 个 带 花 的 树 有 什么 
作用 ,这 是 我 们 在 这 一 节 里 所 要 讲 的 内 容 。 

在 出 现 带 花 的 树 时 ,我 们 按 下 述 方 法 将 花 B 收缩 成 一 个 顶点 Vs, 使 得 图 G 变 成 另 一 
^F EI Gi E GC 中 所 有 两 个 端点 都 属于 B 的 边 收 缩 掉 , 而 G 中 仅 一 个 端点 属于 五 的 边 变 成 
Gi 中 以 Vs 为 一 端的 边 。 

例如 图 ?-10 中 画 的 就 是 从 G 收缩 成 G 的 过 程 ， 
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在 把 G 收缩 成 C; 的 过 程 中 ,G 的 子 图 边 就 变 成 C. 的 子 图 了 。 特 别 是 ,G 中 带 共 的 树 
工人 恰好 收缩 成 G1 的 交错 树 TL ( 见 图 7-11). 


Vi 
G 的 带 花 的 树 工 的 交错 树 7 
图 7-11 


接 下 去 ,我 们 就 在 G, 中 找 以 根 为 一 端的 可 增 
"REP N^ 广 胃 ,当然 不 必 从 头 做 起 , TRET 的 基础 上 来 
e 2e 找 , 也 就 是 在 G, 中 扩大 Ti。 在 扩大 的 过 程 中 ,如 


c wd uy RRA TER H 这 时 我 们 也 就 找到 G 的 可 增 
| PAT. AHALE? 让 我 们 仍旧 结合 上 面 的 例子 
ceang C oanvao PAA TIO 中 可 以 看 出 ,Gi 中 有 一 条 连接 Vs 
的 可 增 广 要 AKTA A SV, 的 边 ,在 这 条 不 属于 全, KANV VoH, 
o e Vs ÆT, HIA V ERAR RIEG 中 就 找 

图 7-12 到 了 一 条 可 增 广 轨 ( 见 图 7-12(a))。 这 条 轨 经 过 


收缩 点 Va, 这 时 应 该 把 Vs“ 展开” 成 花 ,展开 后 

很 容易 找到 原 图 局 的 一 条 以 六 ; 为 一 端的 可 增 广 轨 , 也 就 是 图 7-12(5) 中 用 虚线 标 出 的 那 
一 条 轨 。 

在 G 中 扩展 交错 树 7 时 ， 如 果 出 现 了 一 条 连接 T. 的 一 个 外 点 且 不 属于 T 的 边 EE 
时 ,就 扩大 Ti: 笛 如 果 又 发 现 连接 两 个 外 点 的 边 时 ,就 再 收缩 * 即 把 G BC 05 — T E 
G, ,这 时 就 收缩 成 交错 树 T:。 如 果 在 Gs 中 找到 了 可 增 广 轨 ,就 要 两 次 把 收缩 点 展开 成 
4E 3X, G PERIERE RR. 

HARE RARER V 为 一 端的 可 增 广 胃 的 方法 基本 上 讲 完了 ,总 结 起 来 , 就 是 
用 7. 1 节 中 所 讲 的 方法 和 上 面 所 讲 的 方法 不 断 地 扩大 交错 树 了。 当然 在 遇 到 带 花 的 树 时 
就 应 该 收缩 ,在 扩 天 了 的 过 程 中 ,如 果 发 现 可 增 广 胃 ,那么 我 们 的 目的 就 达到 了 。 如 果 一 
直 没 有 发 现 可 增 广 轨 而 又 出 现 无 法 用 7, 1 节 和 这 一 节 所 讲 的 方法 再 扩大 了 的 情况 , 则 可 
以 断定 ,一 定 不 存在 以 V; 为 一 端的 可 增 广 轨 了 。 这 时 应 该 再 取 一 个 不 同 于 V: 的 未 盖 点 
V RREI KAV; 为 很 的 交错 树 。 当 然 这 样 做 的 结果 或 者 是 找到 了 可 增 广 轨 , 或 者 是 断定 
以 V; 为 一 端的 可 增 广 轨 不 存在 。 然 后 再 取 一 个 没有 考虑 过 的 末 尊 点 …… AED RE 
点 都 考 虑 了 一 遍 , 每 次 都 是 出 现 无 法 再 扩展 的 情况 ,那么 就 可 以 肯定 不 会 有 可 增 广 轨 了 ， 
从 而 断定 现 有 的 匹配 是 最 大 匹配 ， 

例如 ,我 们 将 图 7-10 作为 计算 例子 。 取 这 个 图 中 的 粗 边 作为 初始 匹配 M .对 于 M 来 
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说 有 未 盖 点 Piyys,Yi，Yua 和 Yi 我们 用 扩展 以 未 盖 点 V. 为 根 的 交错 树 的 办 法 ,找到 了 
一 条 可 增 广 轨 , 即 图 7-13 中 用 虚线 标 出 的 那 一 条 。 

在 这 条 可 增 广 轨 上 ,可 用 粗细 边 对 换 的 办 法 ,把 匹配 M, 改进 成 图 7-14 中 用 粗 边 表示 
”的 匹配 M. 对 于 匹配 Ms 来 说 ,还 有 3 TOR SUR Vio Vicl 了, 现在 就 取 定 ioy 然 后 来 扩 
大 以 说。 为 根 的 交错 树 TOLE 7-15(a))。 


Lil 
BAALE Mi, EE 
标 出 增 广 入》 


图 7-13 图 7-14 


由 于 了 无 法 扩展 出 可 增 广 轨 , 因 此 只 得 将 不 属于 了 HER T 的 两 个 外 点 的 边 (7，， 
VOMIT 中 去 ,使 了 或 为 带 花 的 树 ( 见 为 7-15C5)) ,然后 把 花 收 缩 成 一 个 顶点 ,从 而 把 带 
ERR T ERLER T 了。( 见 图 7-150) 


ipe fpem 


—— AD" TYg，, 使 7 成 为 IEBÉCSUR T TR 
点 ,使 带 花 的 树 T 
变 成 交错 树 工 
(a) (6) (c) 


图 7-15 


当然 ,这 时 我 们 也 应 把 图 G 中 的 图 B 收缩 成 一 个 顶点 Vs, 使 G 变 成 另 一 个 图 G. G 
这 里 就 不 画 了 。 不 难看 出 ,收缩 后 的 边 (VY:,Tai) 与 了 的 外 点 Va 关联 , 且 这 条 边 的 另 一 个 
端点 了: 不 属于 了 ,因此 全 又 可 以 扩展 , 妇 再 增加 两 条 边 与 两 个 顶点 ( 见 图 7-316). 

现在 不 管用 7.1 节 和 本 节 所 讲 的 办 法 ,都 无 法 再 扩大 了 了 ,因此 ， 可 以 断定 以 了 io 为 
一 端的 可 增 广 轨 一 定 不 存在 因此 ,我 们 应 该 再 取 一 个 未 盖 点 ,例如 Ya 然后 来 扩大 以 
Vi- 为 根 的 交错 树 T CREE 7-170200. 

由 于 了 中 存在 一 条 由 Yu 为 一 端的 可 增 广 轨 , 因此 在 这 条 可 增 广 轨 上 用 粗细 对 换 的 
办 法 把 图 7-14 中 的 匹配 M, 改 成 图 7-17 GO PER PURSE M. 

对 于 匹配 M; 来 说 ,只 有 一 个 未 盖 点 Yi, 因此 M; 一 定 是 一 个 最 大 匹配 了 a 
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Viz 
Va 
Via 
UV HB RAE 
(a) 
DEXA T 
图 7-16 
Z, 程序 
下 面 ,我 们 给 出 求 任意 图 的 最 大 匹配 的 程序 ，。 
program ren_yi._tu.de..zui-da_pi_peis 
{ 生意 图 的 最 大 多 配 } 
uses 
crt; 
const 
maxn 一 50; 
type 
graphtype 一 arrag[ 1. . maxn,1.. maxn] of integer; { 图 类 型 } 
listtype = artay[ 1. . maxn, 1. . 2] of integer; 
ltype = array[ 1. . maxn | of integer; 
var 
g : graphtypei { 图 的 邻接 矩阵 } 
l ; listtype {1[i,2j 一 与 1 顶点 相 速 的 盖 点 序号 } 
{ 1[is1] 一 与 i 顶点 相连 的 未 尊 点 序号 } 
P 
; types { 一 0 顶点 i AREH } 
TE } 
{ 天 0 MAiA cipi] A RE } 
n ; integer; - { 顶点 数 } 
f 1 text; { 文件 变量 } 


procedure init; 
var ij : integers 
str : stringy 
begin 

clrscr, 
write l’ file name = '); { 输入 文件 名 ,并 和 与 文件 变量 连接 } 
readin (str); 
assign(f atr); 
reset (E) 
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readin (fn); ( EA TDi E) 
fillchar(g,sizeof(g) 0);  ( MERDE } 
while not eof(D do ( 读 入 邻接 矩阵 } 
begin 
readin (£,1,]) | 
gLj]: =]; 
g[j;i]:—1:; 
endi 
clese(D) , ( 关闭 文件 } 


end; 


procedure findway (i ,jinteger) ; 
{ 将 可 扩展 路 上 的 匹配 边 与 非 匹 配 边 对 换 } 
vaT qk ; integer; 
begin 
gt 一 if ki—ji p]: =i; 
While 1[q:2]-7» maxint do 
begin 
p[q]: =k; k: [9.2]: 
plk]: —1[k. 1]: 
q+:=I[k,1]; 
end; 
pal: —k; 
end; 


function kuo tree,boolean; { 车 扩展 路 存在 ,返回 fae， 否 则 返回 false ) 
var i,j qs kv , integer, 
s 4 set of 1. . maxn| 
more : boolean: 
begin 
kun tree; —true, 
repeat 
more ; false, { 设 扩展 路 搜索 成 功 标 志 } 
for i; —1 to n do 
i£ 1[1,2]7-0 then ( S ELE s vi HEREA ) 
for j:—1 to n do 
if (g[i.j177 0) and (p[i l2 D then 
(vi 5S v 有 米 检查 的 边 且 非 丐 配 边 } 
if O[j,21—0) and Q[5,2]—- 0) 
(ERRE Vi BSUGBLZERIIETUNEXE } 
then if p[1]—0 ( 若是 未 盖 点 } 
then begin 
findwnay(,): 
(HATTER o IRR EBULTE D 3EPEBEUEXDTÉR ) 
exit 
end 
else begin ( v, EHA } 
g[i,i]:=—g[i,j]; gii]: — —glisi) 
{ 设 非 匹配 边 之 viwvj 之 检查 标志 } 
Ij; 11: i5 1[pG1,2]:=ji: 
{ 将 匹配 边 < 之 j,p[ 让 半边 入 中 , 设 该 边 检 查 标志 } 
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g[isp[i]]:=—g[j,p[i]]; 
glpLi.]: — —spD1.i1: 
more: =true; ( HAE SIEUT BE) 
end 
else if «1(j,1]— 0) and (1[1,217-0? then 
{ 车 与 v, 相连 的 匹配 边 确 定 而 非 匹 配 按 未 确定 , 即 找到 一 } 
(RATAT T 且 连 接 T 上 两 个 外 点 的 边 <vi,vi> } 
begin 
more; —true, | 继续 搜索 扩展 路 } 
g[i3]: — gli i] giiili--—z[5i]; 
(vivre) 
si [1]; k:=i; V2, 
while l(k.v ]<>maxint do ( 搜索 收缩 顶点 kk} 
begin k;—l[k.v]; «:—s--[k]; v:—3— v; end; 
k:=j; v: = 2; 
while not Ck in &) do 
begin k; —l[k,v]; v:=3—v; end; 
if l[i,1]=0 then 
begin 
l[i }]:=4; q:=i; LEE 
(XE BEI iT ,建立 途经 收缩 花 内 各 } 
{ 顶点 间 的 一 条 交错 路 } 
while q<>k do 
begin 
Ila v liv]: us q:—1[a,v]: v:—8-— vi 
end; 
end ; 
I1]: —is q: =j; v:=2; 
while q«C7*k do 
begin 
I[1La v ],v]: =q; q:—l[g. v]; v:—3—v; 
end; 
end; 
until not more; 
kug-tree:—íalse, { 扩展 路 不 存在 标志 } 


end; 


procedure main; 
var i,j,k,tot : integer; 
b : boolean: 
begin 
fillcher (p,sizeof (p) ,0), tot; —0, 
repeat i; —0; 
repeat incli); (| 考察 下 一 个 顶点 } 
if p[1]—0 then ( 顶点 v; 是 未 盖 点 } 
begin 
fillchar (1 ,sizeof (1) ,0); | { 工 树 初始 化 } 
1[1,2]: — maxint; { 搜索 以 i 顶点 为 一 端的 扩展 路 } 
b: —kuo. tree; 
for j17-1 to n do { 恢复 初始 图 敌阵 } 
* 132* 


for k;—1 to n do 
g[j:&]: —abs(g[5; k D; 
end 
else b: —false; { vi 为 一 端的 扩 红 路 不 存在 } 

until (i>n) or (b); 

{ 直至 求 出 最 大 匹配 或 以 v 为 一 端的 扩展 路 存在 为 止 } 

if i< =n then inc(tot) ; 

{ 若 找到 以 V. 为 一 端的 扩展 路 , 则 匹配 边 数 加 1，} 
until (i72) or (tot-n div 2);{ 直至 求 出 最 大 匹配 或 完全 匹配 为 止 } 
for ji: 一 1 to n do ( 打印 匹配 方案 } 

if p[1]2-0 then 
begin writelnCi.! ——' ,p(il2s pCp[i1]l:— 0: end; 
writelnC number of pi pei : ',tot?; 
end: 


begin 

init; ( 输入 在 意图 } 

main; ( 计算 和 输出 最 大 匹配 } 
end. 


7.6 求 最 小 边 的 覆盖 
一 、 问 题 及 其 算法 


图 7-18 是 一 个 公路 网 ,图 G 中 的 顶点 看 成 是 一 些 村 庄 , 每 条 边 看 成 是 一 段 公路 。 如 果 
在 一 段 公路 上 放 上 一 辆 消防 车 ,就 可 以 把 这 段 公 路 两 端的 两 个 村 上 庄 控 制 起 来 了 ,现在 问 至 
少 用 几 辆 消防 车 才能 把 所 有 村 庄 全 控制 住 ? 这 些 消防 车 应 该 放 在 哪些 公路 上 ? 


上 述 问 题 的 数学 模型 是 ， 
Mite 村 应? 求 无 向 图 G=[V,E] 的 一 个 边 集 合 ,这 个 边 集 
合 恰好 把 图 的 所 有 顶点 都 盖 住 且 含 边 数 最 少 ， 这 就 
HE Ae ug, — 十 所 谓 的 最 小 边 要 盖 。 


例如 图 7-18 中 , 粗 边 组 成 的 集合 就 是 一 个 最 小 
mead abe dap 边 覆盖 ,6 辆 消防 车 放 在 这 些 边 对 应 的 公路 上 ,就 
能 把 所 有 村 庄 全 控制 住 。 

His 由 于 一 条 边 只 能 盖 住 两 个 顶点 ,因此 对 于 一 条 

有 N 个 顶点 的 图 G 来 说 , 盖 住 所 有 顶点 的 边 数 不 

会 少 于 N/2 条 , 即 最 小 边 欧 盖 中 的 边 数 至 少 为 N/2 

条 。 是 不 是 任何 图 都 有 最 小 边 屠 盖 呢 ? 不 一 定 ! 因为 只 要 图 中 有 不 和 任何 边关 联 的 孤立 

顶点 ,这 个 图 就 不 可 能 有 边 巴 盖 了 。 不 过 很 容易 看 出 ,只 要 图 G 没有 孤立 顶点 ,G 就 一 定 

有 边 覆 盖 ( 因 为 这 时 ,图 中 所 有 边 的 集合 就 是 一 个 边 覆 盖 ), 就 可 以 从 图 G 的 所 有 边 覆 盖 
poer Roos WR 

SOROINZTBER IU WO HC MEE EB JC RO RUS . ACTUS DIU RP HAE 

AE BERE CSI RE B 1 条 边 不 管 怎样 选 ,一 定 恰好 盖 住 两 个 顶点 , 第 2 条 边 如 果 先 
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图 7-18 


得 与 第 1 条 边 没 有 公共 端点 ,就 又 可 以 多 盖 住 两 个 顶点 ,而 如 果 与 第 ] 条 边 有 公共 端点 ， 
实际 上 只 多 盖 住 了 一 个 项 点 。 一 般 说 来 ,如 果 选 定 了 S 条 边 ,这 些 边 两 两 都 没有 公共 端 
点 ,能 盖 住 的 顶点 就 最 多 , 即 盖 住 了 23 个 ,从 而 选取 的 边 也 就 可 能 最 少 。 因 此 我 们 应 该 尽 
量 多 选 一 些 两 两 没有 公共 端点 的 边 来 著 盖 ,很 自然 的 应 该 先 选取 一 个 最 大 号 配 M, 因 为 
M 中 含 两 两 没有 公共 端点 的 边 孝 最 多 。 猎 下 那些 未 盖 点 , 想 要 用 一 条 边 益 住 两 个 顶点 就 
不 可 能 了 ,不 得 不 对 一 个 顶点 用 一 条 按 来 盖 。 由 此 得 出 算法 步骤 ; 

求 最 大 匹配 M, 得 两 丽 没 有 公共 端点 的 8 条 边 

对 每 一 个 未 瘟 点 任 取 一 条 边 与 之 相连 ,得 N 一 2* S 条 边 

Y 
M 十 盖 住 未 盖 点 的 N —2 «S SXIUSIBU NES 


Z. RENALA 


program zui- xiao.. bian fu . gais 


(RAAH } 
ctt; 
const 
maxn = 50; 
type 
graphtype = array[ 1. . maxn,1. . maxn | of integer; 
listtype = array[1. . maxn,1. . 2] of integer, 
[type | = array[1. .tmaxn] of integer; 
var 
g : graphtypes ( MEER } 
1 : listtype;  (1[i,135 i DR ACHBEMCR AE AUT S } 
{ 1[i,2] 与 i 顶点 相连 的 况 点 序号 } 
: types { =0 顶点 i 为 未 盖 点 ;} 
p onid } 
{ #0 顶点 i 为 商 点 ,<isp[ 和 之 为 丐 配 边 ; ) 
n : integer; ( 顶点 数 } 
f 3 text; ( 文件 变量 } 


procedure init; 

var i.j + integer; - 

str ; string: 
begin 

clrscr 3 
write('file name = ')i { 读 人 文件 名 ,并 与 文件 变量 连接 ) 
teadin(str): 
assiga(f str) ; 
reset CÉ}; 
readin(£ n2; { 该 人 顶点 数 } 
fillchar (g ,sizeof (g? 0) : 
while not eof(f) do ( 恋人 入 邻接 矩阵 ) 
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begin 
readIn (f ,i,j)s 
gli:i]l;—1: 
gli:i]:—1: 
end; 
close(); 
end, 


procedure fmdwayti,j:integet)i{t 将 本 扩展 路 上 的 匹配 边 与 非 匹 配 边 对 换 } 
var qrk : integer; 
begin 
qr =iy kii pLil:—is 
while 1/0,2]«: 7 maxint do 
begin 
pia]: -k; kc—1[q,2]; 
Pk): -1[k.1]y 
q: =|[k,1]:; 
end; 
pla]: =k; 
end; 


function kuo. tree:boolean;s { 车 扩展 路 存在 ,返回 true, 08 F false } 
var ijiqoksv : integer; 
8 1 set of 1. . maxn; 
more : boolean; 
begin 
kuo. tree; — true; 
repeat 
more; =false; ( HF JREBEIS SOR rs) 
for i, —1 to n do 
if 11,2]770 then. ( 车 已 确定 与 vw， 相连 的 一 条 匹配 边 } 
for j:=1 to n do 
if Cg[i.1j77 0? and (p[11«—p then 
( vi 与 v; 有 未 检查 的 边 且 非 区 配 边 } 
i£ dD, 1]=0} and dD,21=0) 
(ERRE v, 的 匹配 边 和 非 匹 配 边 } 
then if p[ 订 =0 ( 35 v; Eo E C) 
then begin 
findway (isj); 
RATT R, HAR LEA EER } 
exit; 
end 
else begin ( v; ERA } 
gli441:— —gLoi]s gD:ili eli: 
(COE viv ERG OERSBORNUA T 1 
15,1]:—i: [p02]: =j 
gLi»pt3T]: 7 — LH pD1l; 
g pL]: —gDpD3id: 
moare;true, ( 继续 搜索 扩展 路 } 


end 
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else if 人 [Dj,1] 一 0) and (1[j,2]2»0) then 
{ 车 与 vi 相连 的 且 匹 配 边 确定 而 非 匹 配 这 未 确定 , 即 氢 } 
{ 出 一 条 不 属于 HERT CHATI A> } 
begin 
more; —true, { 继续 搜索 扩展 路 } 
gti]: — —u[isili gLisi 1: — — gli]; 
( uo M e bk 】 
s: 一 [ki: 一 iv 一 2 { 搜索 收缩 点 v) 
while [kv] <> maxínt do 
begin k; —l[k,v ]: s: —s-- [E]; v; —3— vi end; 
k:=j; v: =2; 
while not Ck in s? do 
begin k: —l1[k,v]; v:—3— v; end; 
if 1[1,1 ]— 0 then 
begin 
Ifi;1]1:-i: q:=i; MIT 
( ERUS v ,建立 途经 收缩 花 内 各 } 
《 顶 版 加 的 一 条 交错 路 } 
while q< >k do 
begin 
1Li[qasy],v]:=qf q:=l[qrv)s v:—3—vi 
end; 
end; 
Ilj 1]: =i; q:=j; Vio 
while q< >k do 
begin 
IIa v ],v1: =q; a: —l[n.v]i v:3—v; 
end; 
end; 
until not more; 
kuc-tree: =false; ( 扩展 路 不 存在 标志 } 
end; 
{ 直至 求 出 最 大 匹配 或 以 vi 为 一 端的 扩展 路 存在 为 止 } 
{ 着 找到 以 为 一 端的 扩展 路 , 则 匹配 边 数 加 1 } 
procedure main; 
var ti], k,tot ; integer; 
b ; boolean; 
begin 
fillcharp.sizeof(p) ,0); tot: —04 
repeat i: =0; 
repeat incli); ( 考虑 下 一 个 顶点 } 
f p[i]—0 then ( Yi 是 未 盖 点 } 
begin 
fillchar (1,sizeof (1) ,0) ; { 工 树 初始 化 } 
10 2]: 2 maxint; 
b;-—kuo.- tree; { 搜索 以 i 项 点 为 端的 扩展 路 } 
for j;—1 to n do { 依 复 初始 图 矩阵 } 
for k; —1 to n do 
ED. k]:—abs(gD.Ek D; 
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end 
else bi —false; 10A v, 为 一 根 的 扩展 路 不 存在 } 
until (i >n) or (b); 
{ 直至 求 出 最 大 匹配 或 以 v 为 一 端的 扩展 路 存在 为 上 } 
if i< =n then inc(tot): 
{ 车 找到 以 ;为 一 端的 扩展 路 , 则 匹配 数 十 1 } 
until (i7n) or (tot—n div 2); 
for i:=1 to n do 


if p[i]7-0 fi 是 盖 点 , 则 打印 匹配 边 <ivpti> } 


then begin 
if i p[i] then writeln(i,' — —' .p[i i 
end 
else begin ( i RRA. [EC A ILHE iu fERERGA } 
h 7-0: 


repeat inc (j); 
until (>n) or (gli j< >0)} 


if jn 
then writeln(i,' can not fu gai') 
else begin writelnCi,' — —' ,32; inc(tot? ; end, 
end; 
writeln('number of edges : ' ,tot)} 
end; 
begin 


init, ( 输入 任意 图 } 
mein, ( 计算 和 输出 最 小 边 枝 次 } 


end. 
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第 八 章 着 色 问 题 


8.1 求 顶 色 数 


—. 考试 安排 问题 


UC EUR n 门 功课 锅 要 进行 期 来 考试 ,因为 不 少 学 生 不 止 选 修一 门 课 , 所 以 不 能 把 
一 个 同学 选修 的 两 门 课 安排 在 同一 场次 进行 考试 。 问 学 期 的 期 末 考 试 最 少 需 多 少 场次 才 
能 完成 ? 

我 们 以 每 门 功课 为 一 个 顶点 , 当 且 仅 当 两 门 功课 被 同一 个 学 生 选 修 时 ,在 相应 两 个 顶 
点 之 间 连 一 条 边 , 得 到 一 个 图 G( 见 图 8-1(a))。 


8-1 


我 们 将 a 门 功课 划分 成 天 个 子 集 DT，…Do 两 两 子 集 中 的 功课 都 不 相同 。 每 个 
子 集 号 (1 和 i 委 提 中 的 项 点 两 两 不 相 邻 , 即 子 集 内 的 任 两 门 功 课 都 不 能 被 一 个 学 生 选 修 。 
能 按 这 种 要 求 划分 的 子 集 数 天 必须 最 少 , 即 不 能 将 G 的 所 有 顶点 再 细 划 成 & 一 1 个子 和 集 。 
然后 我 们 对 每 一 个 子 集 内 的 顶点 上 一 种 颜色 ,同色 顶点 对 应 的 课程 安排 在 同一 场次 考试 。 
于 是 颜色 数 即 为 学 期 考试 所 和 需 的 最 少 场次 数 。 

例如 图 8-1(6) 就 是 考试 安排 的 一 种 方案 , 令 合 顶点 为 第 1 场次 考试 科目 ,C 〇 顶点 为 第 
2 场次 考试 科目 ,者 顶点 为 第 3 场次 的 考试 科目 。 显 然 

第 1 场 : Bi 

第 2 场 : 数学 .物理 ,计算 机 ; 

35 3 35. 语文 ,英语 ,化 学 。 
考试 安排 问题 ,就 是 求 顶 色 数 的 一 个 实际 应 用 。 

在 讲 算法 之 前 , 先 讲 一 讲 什 么 电 顶 色 数 ? 

将 图 的 所 有 顶点 涂 上 颜色 ,如 果 至 少 要 用 K 种 颜色 方 能 使 任意 两 个 相 邻 的 顶点 颜 
色 不 同 ,我 们 就 说 C 的 顶 色 数 为 K WR XG=K, 


如 果 我 们 将 同色 的 项 点 列 人 一 个 项 点子 集 ,那么 求 X(G)， 实 际 上 是 求 满足 下 列 条 件 
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的 最 少子 集 数 天 
1， 两 两 子 集中 的 项 点 不 同 ; 
2， 每 个 子 集中 的 两 两 顶点 不 相 邻 。 
显然 ,平凡 图 的 X(G) 一 1, 反 过 来 和 (G)=1 的 图 是 平凡 图 ;二 分 图 的 XO 一 并 集合 
和 与 了 各 用 一 种 颜色 ), 反 过 来 X(G) 一 2 的 图 是 二 分 图 。 对 任意 图 G 来 说 ,X(G) 委 和 十 
1, 即 顶 色 数 科 项 点 度数 最 大 值 十 1。 
我 们 由 “每 个 同色 顶点 集合 中 的 两 两 项 点 不 相 邻 ?可 以 看 出 ,同色 顶点 集 实际 上 是 一 
不 独立 集 。 当 我 们 用 第 1 种 颜色 上 色 时 ,为 了 尽 可 能 扩大 颜色 1 顶点 的 个 数 ,逼近 所 用 颜 
色 数 最 少 的 目的 ,对 G 图 的 一 个 极 大 独立 集 涂 颜色 1。 用 第 2 种 颜色 上 色 时 , 亦 本 着 尽 可 
能 多 些 顶点 上 色 的 积极 态度 ,选择 另 一 个 极 大 独立 集 涂 色 …'…，, 当 所 有 顶点 涂 色 完毕 ,所 
用 的 颜色 数 即 为 所 选 的 极 大 独立 集 的 个 数 。 
当然 上 述 颜 色 数 未 必 就 是 X(G) ,而 且 其 和 能 够 合 所 有 顶点 的 极 大 独立 集 个 数 未 必 
唯一 .于 是 我 们 必须 从 一 切 若干 极 大 独立 集 的 和 含 所 有 项 点 的 方案 中 ,挑选 所 用 极 大 独立 
集 个 数 最 小 者 ,其 个 数 即 为 所 用 的 颜色 数 关 (G)。 
由 此 可 以 得 出 算法 步 邓 ， 
求 G 图 的 所 有 极 大 独立 集 ; 
求 出 一 切 若干 极 大 独立 集 的 和 含 所 有 顶点 的 方案 ; 
从 中 挑选 所 用 极 大 独立 集 个 数 最 小 者 , 即 为 XG). 


B 8-2 


例如 :; RA 8-2 的 XCQGORUEE I Ë. 
G 的 一 切 极 大 独立 集 如 下 ， 

T= {ViVa}; T= {Ves Vs}s T= {Vas Vs)s 

下 一 (YY T={VasVe}s l={V, ,Ve}。 

显然 我 们 可 以 选用 6 种 颜色 给 每 个 顶点 涂 色 ,或 者 选用 5 种 颜色 分 别 给 5 个 极 大 独 
立 子 集 涂 色 ,也 可 以 选用 4 种 颜色 ,例如 为 厂 PAI V V 涂 颜 色 1, 太 中 的 V,V 涂 颜 色 
2,1, 中 的 V, 涂 颜色 3,7, 中 的 Te RAE 1. 

但 上 述 方 案 的 颜色 数 都 不 是 X(G) ,正确 的 答案 应 该 是 义 (G) 二 3。 有 两 种 方案 ;一 种 
方案 是 ,给 五 中 的 了 和 V: RAG 1,7, 中 的 V 和 Ys 涂 颜 色 2,7, 中 的 了 和 涂 颜 色 
3; 另 一 种 方案 留 给 读者 自行 分 析 。 

出 上 可 见 , 求 色 数 其 实 需 要 求 极 大 独立 集 以 及 一 切 若干 极 大 独立 集 的 和 含 所 有 顶点 
的 方案 。 这 对 于 大 怪 ,因为 计算 量 过 大 而 成 为 实际 上 难以 奏效 的 算法 ,所 以 不 是 一 个 好 算 
法 。 如 果 不 强求 答案 精确 的 话 , 一 般 可 以 采用 贪心 法 等 近似 算法 来 解 。 
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Z, 程序 


program se. su; 


uses 
cret; 
const 
maxn = 504 
maxs = 109; 
type 
graphiype = array[1. . maxn. i. . maxn | of integer; 
settype = set of 1, . maxn; 
listtype = array[1. . maxs] of settype; 
ltype = array[1. . maxn| of integer; 
var 
g : graphtype; { 邻接 矩阵 } 
Inu : listtype; {Bk EE } 
n,len,len.a,best : integer; { 顶点 数 , 极 大 独立 集 个 数 , 辅 助 变量 } 
GM Be) 
best way Psetype; 《被 选中 的 极 大 独立 集 的 序号 集合 } 
cl : [types {cli] 一 1 第 i 个 极 大 独立 梨 被 选中 } 
f : ext; { 文件 变量 } 
procedure initi 
vat isj : integer; 
str : string; 
begin 
elrscr: 
wtite('filename—'2; t 读 文 件 名 ;并 连接 文件 变量 } 
readln (atr)s { 读 准 备 ,该 顶点 数 } 
assign tf ,atr), 
reset (f); 
readIn(T ,n) s; 
fillchar (g ,sizeof (g) ,02 5 
while not eof(D do ( 该 邻接 矩阵 } 
begin 
readin (fi j75 
gLij]1: 21: g[j,ij:=1; 
end; 
close(f); 
best: =maxint; 
end, 


procedure add (s :settype) ; 
{ 搜索 1[1. .leno]。 若 s SIN EZ Mi E-SEN[E-RIN, TER DEM 
{ 则 退出 ! 车 1 的 所 有 集合 与 s 非 互 为 子 集 关 系 , 则 s 进 1 表 屁 } 
var i,j : integer; 
begin 
i=l; 
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while i<=len do 
i£ 1i] s=i[i] 
then exit 
else i£ l[i] *&—s 
then begin 
for jı =i to len—1 do 
12: Ait 135 
dec (len); 
end 
else incli); 
if len2-maxs then 
begin 
writeln('overflow' ); 
halt; 
end; 
inc (len); 1[len]]: —5; 
end ; 


procedure du. li; { 求 图 的 极 大 独立 售 1f1..len] } 
var i.)  k,t.v : integer; 
s : settype; 
begin 
len: =1; l[1]: -L]: 
for i:—1 to n do 
begin 
l-a: =l; len. a; —len; len: =0; si—[ 7]; 
for j:=1 to n do 
i£ g.J270 then s; —s-F [1]: 
for k: —1 to len.a do 
begin 
add C aLk ]-- G]; 
if s« >[] then add (1. 2[k ]--8?; 
end; 
end; 
for i: =I to len do l(i1: --[1. à ] —I[i]s 
end; 


procedure findway (lev :integer? ; 
var ij 1 integer, 
begin 
j: 790; 
ior i:=1 to lev—1 do ( 累计 选中 的 独立 子 集 , 即 颜 色 数 } 
if cl[i1—1 then inclj); 
if j«best then ( $8 E. Bos a e) 
begin 
best: =j; best ways []; | Mic PERSA ) 
for i; —1 to lev—1 do { 和 被 选中 的 极 大 独立 子 梨 的 序号 } 
if clfi]=1 then best_way;=best_wayt [i]: 
end, 
end; 


isle 


procedure colour Clev :integer ;done :settype? ; 
var xiSettype; 
integer, 
begin 
if done—[1..n] (A TRIREGER E&  BISUEE BA E } 
then findway (lev) 
else begin 
if not ([lev]« —done? 
{ 若 当 前 上 色 的 顶点 是 第 lev 个 极 大 独立 集 的 子 集 } 
then begin 
cl(lev]: —1: 
(S88 lev LACE SUD IE RUBUS DF es } 
colour(lev4-1,done--i[iev I); ( 继续 递归 搜索 } 
end 
else begin 
x:i—[], { 求 第 lev 十 1, ,len 的 极 太 独立 集 的 顶点 和 ) 
for i:=ley+1 to len do x; =x-+l[i]; 
if x--done— L1. - n] then 
(AE ELLO DR x Sr METTRLAIREURE KERIA } 
begin 
cl[Iev ]; —0; 
{ 说 明 第 lev TACAHIGETAREERREIR GRO 
{ 该 极 大 独立 于 集 不 涂 色 标志 } 
colourllev 十 1,done》， 继续 递归 搜索 } 
end; 
endi 
end; 
end, 


procedure show, 
var ij : integer; 
begin 
for i,—1 ta len do ( SR i HR Ue) 
if i in best. way then 
begin 
for j:^-1 to n do 
(TER SCR — HAEA ARARAT RAHAT } 
if j in I[i] then write(j: 32, 
writeln; 
end; 
writeln total number of colours ; ' best); ( 打印 最 少 颜 色 数 } 
end; 
begin 
init; { 输入 图 } 
du. li, { 求 极 大 独立 集 } 
colour (1,[ 5; { 求 项 点 上 色 的 最 佳 方案 和 顶 色 数 } 
show; { 输出 结果 } 
end. 


* 142» 


8.2 求 边 色 数 


8.2.1 边 色 数 
一 、 边 色 数 的 概念 及 其 算法 


边 色 数 是 与 顶 色 救 相 对 应 的 概念 。 将 图 G 的 所 有 边 涂 上 颜色 ,使 得 相 邻 的 边 互 不 相 
同 ,这 时 则 一 种 颜色 的 边 组 束 一 个 两 两 边 互 不 相 邻 的 边 子 集 。 若 能 将 图 G 的 边 划分 为 这 
样 的 天 个 子 集 , 则 称 G 能 正常 天 边 着 色 , 若 至 少 要 用 天 种 颜色 ( 即 可 以 正常 玉 边 着 色 而 
不 能 玉 一 1 边 着 色 ) 时 , 则 称 尺 为 G 的 边 色 数 , 记 成 XX (G) 二 KK, 与 顶点 U 关联 的 边 中 有 i 
色 边 时 , 称 i BERAU 出现。 在 顶点 U 处 出 现 的 颜色 数 且 记 成 CCU)。 

例如 任何 图 皆 可 正常 |E| 边 着 色 。G 可 以 正常 尺 边 着 色 , 当 久之 L 志 1E| 时 , 亦 可 正常 
工 边 着 色 。 显 然 ,X'(G) 之 入 。 正常 边 荐 色 时 CU) 二 4(0), 其 中 UU 是 图 GG 中 任 取 的 一 个 
顶点 。d (0) 为 U 的 度数 同色 边 的 子 集 EOSS) G 中 一 个 匹配 。 

数学 家 们 曾 对 边 色 数 的 计算 作 了 大 量 研究 ,引出 不 少 有 趣 的 结论 ; 

1. G 是 连通 图 , 非 奇 医 ( 即 所 有 轿 含 偶数 个 顶点 ), 则 存在 入 (G) 二 2, 所 使 用 的 两 种 
颜色 在 每 个 次 数 至 少 为 2 的 顶点 处 出 现 ; 

2. X! CCARED— A; 

3. G 是 简单 图 (无 环 无 重 边 ) EA, X' COO AS X (D — AK. 

有 了 求 项 色 数 的 基础 ,不 难得 出 边 色 数 的 算法 。 首 先 通过 边 顶 对 换 的 方法 将 图 和 转 
HAEG: 

G 图 中 的 每 条 边 e 转换 为 图 G' 中 的 一 个 项 点 了 。 若 图 G PARLER, N G' 中 对 应 
的 两 个 顶点 之 间 连 一 条 边 。 然 后 对 C 图 求 顶 色 数 。 在 求 X(G' ) 的 过 程 中 ,应 充分 利用 结论 
3: 使 得 选用 的 极 大 独立 集 的 个 数 在 信和 入 十 1 之 间 。 最 后 将 和 CC ) 个 同色 顶 的 集合 转换 
为 避 图 中 同色 边 的 集合 。 显 然 ,XX(G') 一 XX'(G)。 

例如 : RA 8-3(a) 的 边 色 数 。 


E (Vi V;l-V 


Va » Vi B —IVi V4] Vt 

1 T E = [V4 Vs] — Và 
#7 es E = [Vi V5 ]= Vs 
M CS i M 
95 "m [2 Eg = [Vs Va ] 9 Vs 


E = [V Vaj= Y? 


图 8&3 


将 图 G 按 顶 、 边 对 换 的 方法 转换 为 C( 见 图 8。30C45)), 用 最 少 颜色 数 给 G' 所 有 顶点 上 
鱼 的 一 种 方案 是 CV 人 Ve UU UV BIV h {VV ))。 显 然 XG = 二 4。 转 换 成 对 图 


. 143. 


GiLE&GE E), {EEs}, (E 3, EE; D), X (CG)=4, 


Z., RAER 


{$M 65520.0,655350] 


program dyeing. lines; 


const 

maxi = 200; 

{ 最 大 独立 集 个 数 } 
type 

setrype = set af 1.. maxn, 

linetype = record {x 与 y 之 间 的 一 条 边 } 

xsy:byte 
end; 

ltype = array [1..maxn| of linetype; 
var 

f : text; 

n,del,lam ,s,bd : byte; 

{ 顶点 个 数 . 最 大 度数 . 边 数 .独立 集 个 教 . 色 数 } 

|! : ldtypes 

{ [i 表示 第 i 条 边 成 为 新 图 G' 的 第 i 个 顶点 } 

sn»dyesbdye 1 array [ 1.. maxn] of settype; 


{ 航天 独立 集 . 目 前 着色 方案 .最 佳 着 色 方 案 } 


procedure init; 
var 
P.jeustiintegeri 
atr strings 
begin 
write ('File name = '); ( 该 和 人 文件 名 ,并 与 文件 变量 连接 } 
readIn (str? ; 
assign(f ,str) 
reset (f); 
readin(f n); { 读 入 顶点 数 } 
lam:=0del: 一 0 l 
for i; —1to n do | 读 入 邻接 给 阵 , 并 计算 最 大 度 A } 
begin 
u: =0; 
for j:=1 to n do 
begin 
read (£, t) ;inc(ust)3 
if (157770) and Cip 
then begin 
inc (lam? ; 
Ilam]. x: —i,l(lam]. y: —j 
end 
end; 
if u>del then del: =u 
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end; 
close(£) ; 
s; —0,bd.--del--1 ( MTRT Ehta v1) 


end; 


function check Cw :settype;i:byte) ;boolean| 
{ 车 新 图 中 顶点 i 与 w AIA DURCH CR TRO SUE ER] crue ,否则 返回 false } 
var 
xibyte: 
begin 
check ; =false; 
for x:-1 to lam do 
if (x in w) and CO[i]. x 21[x . x) or Cli]. y—1[x ]. y? 
or AG]. x z-l[x j. y) or Gi]. y--1[x]. x2? then exit; 
check; —true 
end, 


procedure find (w ,w2 :settype sk : byte? ; 
{ 求 所 有 极 大 独立 和 集 } 
var 
i,j:integer; 
x;settype; 
begin 
if w=[1. , lam] 
then begin 
inc(s) ssns]: —w2 
end 
else for i; —k--1 to lam do 
if not (i in w? 
then begin 
x:=[]; 
for 1 —1 to lam do 
if not check([i],j? then x; 2x [i]: 
find Cw +x - [i], w2-4- i]. 
end 
end; 


procedure print (bd ;byte?, 
{ 打印 着 色 方 案 ? 
var 
i.j:integer, 
begin 
for i;—1 to bd do 
begin 
writeln COLOR : '.i:354 
ior j: —1 to lam do 
- if jin bdye[i] then writeln (I[j]. x:3,'! —' 15D]. 7:3); 
wrteln(! » * & x » » x x * x x!) 
end ; 
resdln; halt 


end; 
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procedure dyeing Gw :settype ik «p byte? ; 
{ 求 最 佳 车 色 方案 } 
var 
i;byte; 
X:&ettype i 


begin 
if w -- 1. . lam] 


then begin 
bdye; —dye; 


证 pb 一 1 一 def 
{ 由 于 输入 的 廊 是 简单 图 ,所 以 边 色 数 或 是 A 或 是 A 十 1 } 
{ 车 已 经 找到 色 数 为 4 的 方案 , 则 打印 结果 并 结束 , 举 则 继续 } 


then printídel} 
else dec(bd? 


end 


else begin 
if p» bd then exit, ( 正常 边 色 数 大 于 4A 十 1, 则 退出 } 
if not (an[k ] — w) 
{ 车 已 涂 色 的 项 点 是 第 个 极 大 独立 集 的 子 集 , 则 第 个 极 大 独立 集 去 除 1 


then begin 
{ 除去 已 涂 色 的 顶点 后 的 剩余 顶点 上 第 p 种 频 色 ,并 继续 递归 搜索 } 
dye[p]: —sn[k]—w; 


dyeing Cw -Fdye[ p], k-- 1. p-F 1) 
end; 
x:-sn[k]—w; 
} 


{ 车 已 涂 色 的 顶点 与 剩 下 的 顶点 和 为 全 部 顶点 ;说 明 第 上 个 极 大 独立 集 不 需 涂 色 ，} 
{ 继续 递归 搜索 第 上 十 1 个 极 大 独立 集 上 第 p 种 颜色 的 可 能 性 


for i, —k4-1 to s do x: =x—snli]: 
if x=[1 then dyeing (wk+1,p} 


end 
end; 
begin 

init; E 输入 图 GHA AART G I op Re. 
find([].L].0, 《【 求 G' 的 所 有 机 大 独立 集 } 

dyeing ([]; LD; i 求 台 的 最 佳 顶 点 着 色 方案 } 
printídel--1) ”+ 打印 对 应 于 G 的 最 佳 边 结 色 方案 } 

end, 


8.2.2 边 色 数 的 一 个 实际 应 用 
边 色 数 的 实际 应 用 很 广 ,下 面 举 一 个 实例 ， 


一 、 时 间 表 向 题 
学 校 有 m 位 教师 Xi 2X5, X. 和 n 个 班级 Yi Yat» "€ 老师 为 Y, 班 每 天 上 课 


Pi 学 时 , 试 安排 一 个 授课 表 , 使 学 校 上 课 的 时 间 最 少 。 
令 x= (Xi (Xt Xn) Y (Yi sY, p" »Y.) ,顶点 X, 与 Y; z RI Pi 条 边 相 连 , 形 成 
一 个 二 分 图 。 短 一 学 时 ,教师 最 多 为 一 个 班 上 课 , 每 个 班 也 至 多 接受 一 个 老师 的 授课 。 所 
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以 我 们 的 问题 的 解 就 是 求 二 分 图 的 边 色 数 。 一 个 同色 边 集 为 同一 课时 里 授课 的 教师 和 班 
级 , 反 钠 教师 与 班级 之 间 授 课 关系 的 边 两 两 不 相 邻 ;不 同色 的 边 集 之 间 表 示 不 同 课时 的 授 
课 安排 。 
因 成 (一 分 图 ?一 A, 若 没有 授课 多 于 P 节 课 的 教师 ,也 没有 授课 多 于 P 节 课 的 班级 
P—max(P,; | ism, 1S j&n) —A, inf VAdgtH — 28 d P 节 课 的 时 间 表 。 
例如 : 4 名 教师 .5 个 班级 ,教学 要 求 如 下 : 


X X X X Y, Y, Y, Y, Y, 
Ar 2 0 1 1 0 
X,| 0 0 0 

A= 2 . 1 1 
n Ys Y; Y, Ys X; 0 1 i 1 Q 
图 s4 X,L 0 0 0 1 1 


以 X= {Xis Xz Xis KX hY S (YY 7 YYs)} 为 
二 分 图 的 顶点 构 作 二 分 图 , 当 A 矩阵 中 i,j BERA att WE X 5 Y; 2 BUM akih 
OLEI 8-4)。 
按 上 一 节 所 讲 的 算法 ,得 出 边 色 数 和 (4G) 一 4, 其 中 一 种 课表 方案 如 表 8-1 所 示 。 


共用 四 闻 教 室 , 因 为 第 一 节 课 YS YSY Y 四 个 班 都 在 上 课 。 如 果 学 校 的 设施 有 限 ， 
要 减少 若干 教室 , 令 学 校 一 天 最 少 安排 几 节 课 ? 换 句 图 论 的 话说 , 题 意 要 求解 出 一 种 达 色 
3k P>5& 的 正常 善 色 ,《 即 增加 每 天 的 课时 数 ) ,使 得 同色 边 集 中 的 边 数 减 少 ( 即 减少 同 课 
时 内 授课 的 教师 数 ), 以 达到 减少 煌 室 数 的 目的 ,显然 ,要 开设 LL 一 2Pjy(1 mimi 
了 魏 杂 ) 门 功课 , 编 成 每 天 PLP 之 A) 节 课 的 功课 表 , 每 节 课 平均 要 开工 /P 门 功课 ,至 少 需 
要 {L/P} 间 教室 。 为 了 编制 功课 表 , 我 们 首先 必须 求 出 边 色 数 P: 


A [L/ 教 定数 ] 十 1 二 AA 
P= ttu 教室 数 ] (L mod 教室 数 — 0) AND ([L/ 教室 数 ] 8-122 A) 
[L/ 教室 数 ] 十 1 CL mod 教室 数 所 > 0) AND ([L/ 289 X] 4-127 A) 


=. 排 时 间 胡 的 程序 
下 面 给 出 时 间 表 向 题 的 程序 题解 ， 


program time. table. arrangment; 


const 
maxn. = 255; 
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{ 最 多 课程 数 } 


type 
linetype — record 
xyibyte { 第 x 个 教师 上 y 班 的 一 节 课 } 
end; 
itype =  artay [1 . maxn] of linetype, 
{ 边 预 对 换 形 成 的 新 图 } 
settype = set of 1.. maxn| 
var 


m,n»p»am,sns.bd,kk  ; integer; 


(HA EAA BAN UR PY RE ME MU P pu i M 
f 


text; 
1 : ltype; 
smen : array [1. .maxn] of settype; 


{ 极 大 独立 集 , 最 佳 排 课 方案 ,( 当 前 排 课 方 案 ) } 
procedure init; 


var 
ijetox uibytes 
stristring; 
begin 
write('File name = '), ( 输入 文件 名 ,并 与 文件 变量 连接 } 
readln latr); 
assign (f str) i 
reset (15 ; 
readin(f «m ,n ,p) ; { 恋人 教师 数 、 班 级 数 和 教室 数 } 
lam: 一 03kk :一 03 { 总 课时 和 每 天 最 大 课 数 初始 化 } 
for i; 71 to m do 
begin 
us 一 0 
for j:—1 to n do 
begin 
read (ft); { 读 和 人 教学 要 求 } 
for x; —lam--1 to lam+t do 


begin 
1[x]. x; =i;l[x]. y17i 
end; 
lam; —lam--t; ( HERE REP } 
incu ,t) 
end; 
if u>kk then kk, —u ( 计算 每 天 最 大 课 效 } 
end; 
close (D ; 
8n: 770; 
end; 


function check Cw :settype sk : byte) : boolean; 


| 检查 上 是 否 相对 w PATRE } 


i:integer; 
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begin 
check , =false ; 
ior i; —1 to lam do 
if <i in w) and CO[X. x—1[1]. x? or (fk]. y 1t]. y» 
then exit; 
check: —true 
end; 


procedure find (d ,k : byte sw isettype?; 
{ 求 极 大 独立 集 } 
var 
i:iinteger; 
b:boolean; 
begin 
b 1 —1alse; 
i dep 
then for i; =k+1 to lam do 
if not (i in w) and checkCw ,i) 
then begin 
b; —true, 
find(d-- 1,i,w + [i]? 
end; 
if not b 
then begin 
for i; 71 to sn do if w«—s[i] then exit; 
inc (sn) ; 
s[sn]; =w 
end 


end, 


procedure print ; 
{ 打印 排 课 方案 } 
var 
i,jrinteger; 
begin 
writeln, 
for i:=1 to bd do 
begin 
writeln{ * # # * +’, * x x * x), 
for j;— 1 to lam do 
if j in men[i]) 
then writeln TEACHER : ' ,1[j]. x 4»! CLASS; 
end; 
readin ; halt 
end $ 


procedure paint (pp »k:integer;w :settype); 
{ 对 新 图 1 求 正 常 着 色 方 案 } 
var 
i integer, 
X :settype 


! Ad. y; 


* 149 * 


begin 
i£ w=[1. . lam] 
then begin 
if p—1<=bd then print{ 若 自 前 方案 是 正常 著 色 方案 , 则 打印 结果 } 
end 
else begin 
if pp>bd then exit; 
if not ([kj]«—w) 
then begin 
men(pp]: —sfk]—w: 
paint (pp4-1 k-- 1 ,»w J-men[pp )? 
end; 
x;—s[k]—w: 
for i; »-k-4-1 to sn do xi —x—s[iTi 
if x —[] then peint(pp,k7-1.w? 
end 
endi 
begin 
init; 
find(0,0,[ Ds { 求 极 大 独立 集 } 
if lam div p--1 < kk ( 根据 总 课时 和 教室 数 求 每 天 的 最 大 课时 数 bd } 
then bd, —kk 
else if lam mod p = 0 
then bd; —lam div p 
else bd: —lam div p + 1: 
paint(1,1,[ D; { 求 bd ZuEY3 E & } 
end. 


三 、 另 一 种 算法 


下 面 ,我 们 给 出 一 个 新 的 算法 ,这 个 算法 是 由 两 条 定理 引出 的 ， 
1. EE; 是 对 图 G 正常 状 色 时 的 两 个 同色 边 集 (显然 E; E; 是 图 C 的 无 公共 边 的 匹 
BO.HIEIT [E;| NERTH G 正常 着 色 的 另 两 个 同色 边 集 ELLE, ,使 得 
|Ei| = |E] — 1; [Ej] = IE] +1 
E; U E; = EU E; 
那么 ,如 何 求 满足 上 述 条 件 的 EEE? 我 们 给 出 一 种 方法 ， 
在 由 E 5 E 组 成 的 子 图 里 ,寻找 一 条 边 在 E 与 E; 中 交错 出 现 且 始 边 和 终 边 比 在 
E, Ri P rb. 
P= gi yers" Ent1 
其 中 Er Enp ÀJ. Ei 中 的 边 , 用 细 实 线 表 示 ; 
eia ttes]. E; 中 的 边 ,用 粗 实 线 表 示 。 
我 们 采用 粗细 实 线 易 位 的 办 法 得 出 
E; = (E;— {ees"""emt1}) Utesensel 
E; = (E,— (ez, } ) U lei est toil 
"150 。 


RH EH ETREX G 正常 着 色 的 两 个 闻 色 边 集 ,满足 定理 1 的 要 求 。 

例如 ,第 1 节 课 的 授课 安排 E 与 第 4 节 课 的 授课 安排 把 有 一 条 交错 轨 (7 大 ) 
(AYDAXO CRR 8. D. SEX Ie SUE Im ZR E Dr. f d ELT (OOGY0 (XsY,) 
(GGY)),Ei- { (X;Y)DGAaGUYDOGY OMA 8-25, 
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共用 3 间 教 室 , 因 为 每 节 课 至 多 3 个 班级 在 上 课 。 AR ROTIE E HEB TE AY 
课 里 完成 二 二 11 门 功 课 的 课表 ,至 少 需 要 3 间 教 室 。 那么 ,是 否 可 以 通过 适量 增加 一 天 课 
时 数 的 办 法 减少 教室 呢 ? 我 们 引出 定理 2; 

2. G 是 二 分 图 ,A 似 P, 则 存在 PP 个 对 避 图 正常 着 色 的 同色 边 集 上 E Er E 
Eis Ea" ‘Ep 是 图 G 内 P 个 无 公共 边 的 匹配 ) ;使 得 

E(G) = ÚE 

于 对 于 ISSP 

[G 的 边 数 L/P 1 | E, |: (G BIB L/P) 

3E. 3n fex sx BH o RHEE CP T 80 ER ECRCBELL/ PE? E EGY 
为 EE Ea Esa, nm ESRB EF Ea 为 
对 G BASIS RIAL LE, m E, p RI EG) = UE 

反复 运用 定理 1 和 2 于 那些 边 数 差 大 于 Lp ROSEO 8. ROEP CE 
常 荐 色 的 同色 边 集 E En" LEPHBIELL/P]« | E | s UL/PY Cs; 魏 P) 的 要 求 。 

例如 , 欲 占 用 两 个 教室 ,由 于 fl11/6) 一 2,[1176]=1, 则 可 编排 每 天 6 节 课 的 课表 ,每 
节 课 1 一 2 个 班 在 上 课 。 

表 8-3 的 6 节 课 的 课表 ,是 根据 定理 1 和 2, 把 表 8-2 中 的 同色 边 集 调整 成 6 个 两 两 
不 相交 的 同色 边 集 的 结果 。 


这 个 程序 留 给 读者 编写 。 
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第 九 章 “可行 遍 性 问题 


可 行 记 性 问题 是 指 下 述 两 类 问题 ， 

1L 是 否 可 以 从 图 G 的 任何 一 个 顶点 出 发 ,不 重复 地 行 忆 所 有 的 边 . 如 果 可 以 , 列 图 G 
中 必 有 一 条 路 (回路 ), 经 过 各 条 边 恰 好 一 次 。 这 条 路 (回路 ) 称 为 欧 拉 路 (回路 ) 。1. 3 节 中 
的 一 笔画 问题 就 是 欧 拉 路 (回路 ) 问 题 。 

2. 是 否 可 以 从 图 G 的 任何 一 个 顶点 出 发 ,不 重复 地 行 遍 所 有 的 顶点 。 如 果 训 以 , 则 图 
G 中 必 有 一 条 轨 《 图 ) ,经 过 每 个 顶点 怡 好 一 次 。 这 条 轨 ( 轿 ) 称 为 哈密 尔 顿 轨 ( 轿 )。 

从 表面 看 ,哈密 尔 顿 轨 (图 ) 与 欧 拉 路 (回路 ?非常 和 似 , 但 实质 上 两 者 的 理论 迎 然 不 
同 。 在 1. 3 节 中 给 出 了 一 个 很 简单 的 方法 来 判断 一 个 图 是 否 可 以 一 笔画 成 ,可 是 对 于 哈 
密 尔 顿 轨 ( 圈 ,迄今 为 止 尚 无 有 效 算 法 ,也 不 知道 究竟 存在 不 存在 有 效 算 法 。 在 这 种 情况 
下 ,我 们 只 能 介绍 几 种 近似 算法 。 


9.1 中 国 邮 路 问题 


一 、 问题 及 其 解法 


一 个 邮递 员 从 邮局 选 好 邮件 去 投递 ,然后 回 到 邮局 ,当然 他 必须 经 过 他 所 管辖 的 每 条 
街 至 少 一 次 。 请 为 他 选择 一 条 路 线 , 使 其 所 行路 程 尽 可 能 地 短 。 

我 们 首先 把 这 个 闻 递 员 的 辖区 变 成 一 个 图 (如 图 9-1) ,路口 变 成 项 点 ,每 条 衔 变 
成 边 , 边 上 的 权 表 示 街 的 长 度 . 上 述 邮 路 问题 就 变 成 了 在 连通 加 权 图 上 求 取 含有 一 切 边 的 
权 最 小 的 回路。 我 们 称 这 种 回路 为 理想 回路 。 显 然 在 欧 拉 图 中 , 每 条 欧 拉 回路 都 是 理想 
回路 。 


图 9-1 


下 面 介绍 一 种 在 欧 拉 图 中 求 欧 拉 回路 的 算法 ， 
设 久 :一 一 当前 已 选 定 的 一 条 各 边 相 异 的 路 ei ,es，*… ,ei。 
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SERRA V. HR, 
—*1 
车 已 选 定 道 路 We eise RA 
五 一 {eives 和 ye 中 选取 一 条 满足 下 列 条 件 的 边 ei 
q em e; Yi45, 
© 除非 E 无 选择 余地 e+1 不 要 选 人 一 个 一 (elrezevrej 中 的 桥 
Y 


Tre GR Exe iih 3] 
VY N 


"T 得 出 殉 拉 回路 


本 一 ee reiseif1H Tli 


按 上 述 算法 求 图 9-1 中 的 欧 拉 回路 ， 
AV. 出 发 , 取 Wi;-e,. 这 时 与 eu 相 邻 的 末 采 用 过 的 边 只 有 Eza 尽管 €a 是 G 一 ea 中 的 


Bt ,但 已 无 其 它 选 择 的 余地 , 故 只 有 取 


W;-ee, 
到 此 ,Ws 不 可 选 为 eezes ;因为 es Æe {eyes} 的 桥 , 而 这 时 并 非 无 其 它 选择 的 余地 ， 
例如 可 以 不 选 es EXE ea 和 es, 所 以 可 以 联 


Ws = 4177.7. 
继续 执行 上 述 算法 ,得 
W,-—eeese, 
W;,-ee;ee,es 
W,-—eyeiese, gs 
We 即 为 iki mieg r] 
二 、 程序 
下 面 给 出 求 欧 拉 图 中 欧 拉 回路 的 程序 。 
program fleury; 
const 
maxn = 30; 
type- 
nodetype = record (可 增 广 轨 的 类 型 ， 标 导 积 检查 标志 } 
]】,P :integer3 
end; 
arctype = record | AHAL e CR HE) 
cJ integer 
end [1 
gtype = array [1.. maxn,Q. . maxn ] of arctype; 
itype = array [1.. maxon] of nodetype: 
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vat 


f : text; { 文件 变量 } 
g : Btypes MET } 
nest ; integer; {WAR WA DA) 
it : ltype; ( 可 改进 路 } 
function read. graph integer, 《初始 化 ;恋人 邻接 矩阵 g .并 返回 奇 硕 点 的 个 禾 ; 
var 
sir strings 
isjet:integer; 
begin 


wtite('Graph file — '); (EA (EE JESOUITAEBOETE } 
readInGetr) ; 
assign sir): 
reset (f); 
readln (f m) ; { 读 入 顶点 数 } 
fillchar(g sizeof fg) ,0) ; 
t:—05 
forii-1 to n do 
begin 
for jj —1 to n do 
begin 
read C g[i,3J. c) imei 0]. e.g [i,1]. e? 
CEARRA iti mA } 
end , 
if odd(g[i,0].c) then inc (t) £ 计算 奇 顶点 的 个 教 } 
end: 
ciose (D ; 
read. graph: t 
end; 


function check integers { 返回 一 个 已 标号 而 未 检查 的 项 号 序号 } 

var 
integer: 

begin 
i=l, 
while (i —n) and not COt[i]. 1-272202 and Gi[il. p=0)) do inc); 
if i77n then check: —0 

else check: =i 
end; 


function ford(var a;integer) :boolean: 
{ 沙 存在 Æ v 前 可 改进 路 返回 false 和 改进 量 a } 
var 
i;jim x integer; 
begin 
ford ; true; 
{illchar (It sizeof (lt) 0); { 改进 路 初始 化 1 
lts]. i; =2; UK v, FEHR } 
repeat 
i; —check, { 报 一 个 已 标志 而 未 检查 的 项 点 序号 } 
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ifi—0 then exitf 《该 项 点 若 不 存在 , 则 无 下 改进 路 ,返回 true } 
for j:=1 to n do (EKAS i 要 邻 的 弧 的 前 向 驱 或 后 向 部 标志 } 
if Ci]. 12502 and Cüg[i je >>0) or (glij i]. c02) 
then begin 
if Cali» il. fglisil c? then [j]. l: =i; 
i£ (g[ 1,1]. £270) then it[j].1;——i 
end, 
kh[i]p.—cl — (WMiskEdexm E) 
until tit]. 1«27700; (ÉL E v, 38 v 的 一 条 改进 路 找 出 为 止 } 
m:=tsya:=maxinty { 从 开始 , 例 向 计算 可 改进 最 } 
repeat 
hmim;abs(H i] D; 
i£ 1t[j]. 10 then x; —g[ jm]. £—0; 
i£ Hj]. 17720 then x:—g[m.;j). c—gEm,»j]. f 
if a77x then a: =x 


until m4, 
ford: — false 1 返回 可 改进 路 存在 标志 false } 
end; 


procedure fulkerson la jiinteger) ; 
{ Xa a EN upptdg1134354 
var 
m.,ji:integer; 
begin 
m:==t; 
repeat 
ji mim; —sbsOd j]. D; 
if [j], 1&0 then gLj«m ]. £i g[j«m). £—a: 
if 1£(j1. 17-0 then g(m,j]. f: —g[m,j]. £d-a 
until m=s 
end; 


function proceed(a ,b integer) ;boolean: 
var 
psisdel;integer; 
success : boolean; 
begin 
for s: 一 1 to n do 
for t1—1 to n do 
if (s«77£) and (gls,t],c=0) 
{ 者 V. 与 va EAM, RI UL Y, p: EA pe vu H } 
then begin 
for i:=1 to n do 1 BUE SX LC EU S EE } 
for pi—1 to n do g[i,pl.fi—0; 
repeat 
succeas ; = ford (del), 
( 搜索 可 改进 路 和 改进 量 del } 
证 not success then fulkerson (del) 
{ 车 可 改进 路 存在 , 刚 按 del 收 正 该 路 上 的 流量 } 
until success, ( 直至 最 大 济 求 出 } 
p:=0;for i11 ton do p:=p+gLs+il. f; 
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{ 求 最 大 流量 p } 
if (p=1) and (g[a;b].f£—1) 
{ 车 最 大 流量 为 1 H v. Zv 的 流量 为 1 } 
then begin 
proceed: —true jexit 
{ 则 vw EMIL ME AEST 
end 
end ; 
proceed ; —1íalse 
end, 


procedure Euler; 
var 
i,x,ti.integer; 
begin 
x: =read_ graph; ( 读 和 人 图 和 给 阵 , 并 返回 奇 顶 点 的 个 数 } 
if x« 70 then exit). ( 存在 奇 顶 点 , 则 返回 } 
x:—li { 从 vw 开始 搜索 } 
repeat 
t; maxint ( 设 以 x JG REBEL ERE } 
for i:=1 to n do 
if (g[xii]. c. Uri AT 
then if proceed(x,i) ( <x i> ER Aii 为 弧 头 ,继续 循环 } 
then ty =i 
else begin 
ts =isis —n { LR Mer M i ELEM f.p i } 
end; 
if t«—maxint ( U x ARRATE)? 
then begin 
writeln(x,' — — —',1)4 ( HARME } 
g[xs£l. ci Oig[ ex]. ci—0;xi—t 
{ XEM xc RRR t ABTA } 


end 
until t—maxint, { 直至 得 出 Euler 回路 ) 
end, 
begin 
Euler { Euler 回路 } 
end. 


EXErh EIER [61 LER — fri x8 P3 BIS ER FRI ER HO Be] G 本 身 必须 是 欧 拉 图 。 

E G PERRE, EE ep UAR [91 Rec E48 1 er 1x. din 9-2(40) X -U—Y —W 
—U—Z—W-—Y—X—U—W-—U-—X-—Z-Y—X 是 理想 回路 , 边 UX,XY,YW 和 WY 上 
通过 了 两 次 。 把 边 e 的 两 端 间 再 连 上 一 条 权 亦 为 WCe) 的 新 边 , 则 称 新 边 为 原来 那 条 边 的 
fii, UX, XY, YW 和 WY 都 有 倍 边 ( 见 图 9-2(8))。 这 样 的 邮 路 问题 更 具有 通用 性 , 故 称 


一 般 邮 有 路 问题 。 
它 的 数学 模型 是 : 
1， 用 倍 边 法 由 G 得 到 G* 图 ,使 G' 图 是 吹 拉 图 , 且 
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图 92 


DOW CRGA e) = min 
2. 在 G* 中 找到 欧 拉 回路 。 
这 个 程序 留 给 读者 去 编写 。 
9.2 货 郎 问题 1 
一 、 货 邮 问 题 与 哈密 尔 顿 回路 问题 


1859 年 英国 数学 家 哈密 尔 顿 (Hamilton) 提 出 了 一 种 名 为 周游 世界 的 游戏 .他 用 一 个 
正 十 二 面体 {图 9-3(4)}) 的 二 十 个 顶点 代表 二 十 个 大 城市 ,要 求 沿 着 楼 ,从 一 个 城市 出 发 ， 
经 过 每 个 城市 恰好 一 次 ,然后 回 到 出 发 点 。 


(a) H2) 
Ho 9-3 

这 个 游戏 普 经 风靡 一 时 , 它 的 解 称 为 哈密 尔 顿 图 ,并 不 难 求 . 为 了 清楚 起 见 ,我 们 做 一 
个 平面 图 (图 9-3 000 ,与 这 个 十 二 面体 的 顶点 和 杰 所 组 成 的 图 同 档 。 显 然 ( 图 9-3 00 PH 
粗 的 边 组 成 的 图 就 是 一 个 解 。 符 合 要 求 的 解 当 然 不 下 一 种 ,即使 固定 前 5 个 城市 (顶点 )， 
还 有 4 种 不 同 的 解 。 如 果 不 要 求 回 到 原来 的 出 发 点 , 解 ( 称 为 哈密 尔 顿 轨 ? 就 更 多 了 。 读者 
可 以 自己 试 着 再 找 出 几 种 不 同 的 解 。 

现在 我 们 给 出 一 般 的 哈密 尔 杭 轨 或 哈密 尔 顿 器 的 定义 : 
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在 G 图 中 ,如 果 有 一 个 轨 ( 轿 ) 经 过 每 个 顶点 恰好 一 次 ,那么 这 个 轨 ( 图 ) 称 为 哈密 尔 
顿 轨 (图 ) 。 

哈密 尔 顿 轨 ( 图 ) 与 欧 拉 路 (回路 ) 不 同 , 它 迄今 还 没有 一 个 象 样 的 判别 方法 ,只 是 分 别 
地 给 定 了 一 些 充分 条 件 , 另 外 给 了 一 些 必 相 条件, 用 这 些 条 件 来 判定 任意 给 定 的 图 是 否 是 
哈密 尔 顿 图 ,只 能 在 特定 的 情形 下 才能 见效 。 下 面 给 出 一 些 判 别 方 法 ， 

1. 车 G 是 二 分 图 , IX | 9m. |Y =n Elma | 之 1, 则 二 分 图 G 没有 哈密 尔 顿 轨 ; 若 
G 是 完全 二 分 图 天。 在 和 和 = 时 ,无 哈密 尔 顿 图 ;在 mr 二 x 时 ,有 [La/2] 条 无 公共 边 的 哈密 
ARBRES s 

2. 若 图 G 有 哈密 尔 顿 图 ,从 G 中 去 掉 若 干 个 顶点 Yuy:…,Yx EUR ESO 
得 到 图 G' ,那么 上 G' 的 连通 分 支 不 超过 下 个; 

3. 是 顶点 数 z>>3 的 简单 图 ,车 对 任 两 个 顶点 口 和 V ,dU0) 十 d( 让 之 n 一 1, 则 GG 中 
FERR E dU) +d n WG 中 有 了 哈密 尔 顿 轿 ; 或 者 车 每 个 硕 点 的 次 数 宇 n/2， 
则 G 有 哈密 尔 顿 圈 ; 

4， 如 果 避 是 一 个 顶点 数 为 n 的 简单 图 ,V 与 VV' 为 某 一 对 不 相 邻 的 顶点 d CV) 十 
dV n EMRA VOA G 上 得 到 图 G' ,那么 当 且 仅 当 G 有 了 哈密 尔 顿 圈 时 G' 有 
哈密 尔 顿 图 。 

按 上 述 方法 ,依次 把 G 中 次 数 之 和 至 少 为 当前 顶点 数 的 不 相 邻 的 两 个 顶点 间 添 加 一 
条 边 ,直至 没有 可 能 青 添 加 边 为 止 ,最 后 所 得 的 图 G' 称 为 G 的 闭 包 。 显 然 ,G 有 哈密 尔 顿 
图 的 充分 必 刘 条 件 是 G' 有 哈密 尔 顿 图 。 

在 目前 情况 下 ,要 精确 池 求 出 图 局 中 的 一 条 哈密 尔 顿 轨 ( 圈 ), 只 有 采用 回 洲 法 等 讶 
目 搜索 的 办 法 ,运行 时 和 介 很 长 。 车 读者 能 在 程序 中 适当 运用 上 述 判别 条 件 作 约 束 的 话 , 可 
能 会 改善 一 点 搜索 效率 。 

回 到 题目 上 来 。 所 谓 货 郎 问题 1 指 的 是 ， 

一 个 货 郎 到 各 村 去 卖 货 ,再 回 到 出 发 处 。 每 两 村 之 间 的 售 货 时 间 一 定 , 每 个 村 都 要 串 
到 且 仅 到 一 次 。 为 其 设计 一 条 路 线 , 使 得 所 用 旅行 售 货 时 间 最 短 。 

上 述 问题 的 数学 模型 是 在 加 权 图 G 上 求 一 个 哈密 尔 屯 圈 C,, 使 得 

W(C,) = iWte) = min{ 各 个 险 密 尔 顿 图 的 权 } 


EC, 


显然 ,车 设 G 图 每 边 的 权 为 1, 则 又 可 以 成 为 周游 世界 游戏 的 数学 模型 。 
上 述 货 郎 向 题 至 今 无 有 效 算法 ,下 面 介绍 一 种 近似 算法 一 一 “改良 图 算 法 ”。 
已 知 C—V,,V,,--.V..Vi 是 G 的 一 个 哈密 尔 顿 圈 ;我 们 用 下 面 的 算法 把 它 的 权 减 小 : 
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一 一 - 
C LEERESÉTij 
IE GEH PETRNCT G HUV -VAN e) 
EWV, VHW ON a) 


<W VYW Vado N 
Y 
| ME TUER iL 
构成 新 图 


注 ， C 中 的 VV; 在 C 中 倒序 排列 
+ 
CC, 
LL | 


例如 图 9-4(a) 为 货 郎 卖 货 的 路 线 , 各 时 间 的 售 货 时 间 必 为 边 权 在 图 中 标 出 。 


WCAD)H-WCIESGOA)-W(D) WIE) -WGB)WB + WD) 
Co~ E[DCB|AFE C1= [E]BCDA [EE] 


(e (b (e) 


V(ACHEV(EDYV(CD)--V(AE)  C3=EDACBFE 
C2-HEEBC| DAE) 


id {e} 
图 94 
Hig Co = EDCBAFECXLPI 9-4Ca))。 图 9-40), (c)s Cd) (ORAH T A R EREK 


过 程 。 算 法 终止 时 的 改良 图 为 Ci =EDACBFE, KHET E em E 
13 十 70 十 21 十 35 十 2 十 51 二 192( 小 时 》 
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二 , 程序 


program proved_circles} 


const 
maxn 一 20; 
type 
ghtype = array [1. . maxn, 1.. maxn] of integer; ( WHE BEEN } 
pathtype = array [1. . mazn] of integer; I4 1 Er 
settype = set of 1.. maxn; 
var 
n,len : integer; [ 顶点 数 , 代 价 和 } 
E : ghtyp;  (EBUSAEEEREE } 
f 1 texti { 文件 变量 } . 
Y pathtypes ( v0 一 一 改良 图 上 第 i 个 顶点 的 序号 } 
procedure read graph; 
var 
str :string s 
i»j:integer; 
begin 
write('Graph file = 0; 《诚信 文件 各 并 与 文件 变量 连接 1 
readIn(str) , 
assign (E str); 
reset (f) ; 
readin (f.n); RATAR } 


for i;—1 to n do (IRA HER BE } 
for j: —1 to n do read G,g[ i.i; 


close (£) 
end; 
function find - first (s :integer im aettype) : boolean: 
var 
i:integer; 
þegin 
find first : = trues 
if (m=[1..n]} and (gÜUv[s—1],v[1]]—— mazino 
(Ane BRE PGE. ME rue } 


then exit 


else for ji: 一 1 to n do 
if not G in m) and (g[v[s—1],i]«  maxint) 


CER DRE URELIE AR s 一 1 个 顶点 与 顶点 ii 有 边 ，} 
{ 则 顶点 i 作为 图 内 第 3 个 顶点 } 


then begin 
vla]. =i; 
if find .first(s4-1,m--f11) then exit 
{ 车 递 轨 扩 展 下 去 形成 哈密 尔 瑟 围 , 则 返回 true } 


end i 


find. first; =falae ( 哈密 尔 顿 图 不 存在 ,返回 false } 
end; 
* 160 。 


. begin ifr 
if a= then ft. =n { 
else ft; —a—1 


function ft (a ,integer) integer y ( 全 a 一 1 } 


end; 


begin { n= 
if a—n then nt,—1 i 
else nti 一 3 十 1 


function nt(a integer) integer; { f a-n) 


end, 


procedure pcircle ; 
var 
i,jt:nteger: 
begin 
for i: —1 to n do (X ow GT D twirl awie wG, | 
for j;—1to ndo ( DE] h D F .} 
H Gp and G«ntG3) and (tO «nt» 
then if (gIvIi],v[nt C ) < > maxint) and GvIitGY], v[3Y)« 7 maxint) 
then if CGg[v(i] v[ntG21]g-aCeLé G2 v DT 
« GEvfeG] v) gv vEnc 12 
then begin 
while (i<j) do 
begin 
ti v[£] vä]: 2v]: G]: =t; 
inci) dec) 
ená; 
i1=1;j:=1 
end; 
len; 0, writeCv[1]1:32 5 { 计算 .打印 旅行 千 货 路 线 的 方案 和 代价 } 
for ii 二 2 to n do 
begin 
writeCv[i]:32i 
len: —lend-g[v[i— 1]. v[11]s 
end; 
writelnCv[1]:35; 
writela(' Hamilton Length = ',len-Fg[v[n ],v[ 11D 
end; 
begin 
read. graph; < & APR.) 
*[1]:=1)} 
if find. first(2,[1]) then peircle ( 若 从 顶点 1 出 发 求 得 输 密 尔 顿 图 ,} 
{ 铀 在 该 可 上 进行 改 自 ,并 输出 近似 解 } 


end. 
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9.3 fX BB E 


一 、 再 论 货 部 问题 


货 郎 癌 题 有 两 种 定义 ,一 种 是 给 出 了 赋 权 无 向 图 ,要求 找 出 经 过 每 个 顶点 恰好 一 次 而 
边 权 总 和 最 小 的 哈密 尔 顿 图 . 这 就 是 9. 2 节 的 货 艺 问题 1, 而 货 郎 问题 2 放宽 了 每 村 和 丛 好 
被 访 一 次 的 条 件 , 而 成 为 不 限 次 数 她 让 访 每 一 村 5( 即 至 少 访问 一 次 ) 而 边 权 总 和 最 少 的 回 
B, 
显然 这 个 问题 的 数学 模型 是 在 加 权 图 G 上 求 一 个 生成 回路 C, 使 得 
WCO = SW) = min{ 各 个 生成 回路 的 权 } 


iX C 叫做 理想 回路 ， 
下 面 给 出 货 郎 问题 2 的 近似 算法 : 


求 G 的 最 小 生成 树 芽 
Y 
E. T MER UUETEDRBEDUAGTSUR .— 37 JRURI DSL BR (8614889 ARE BE AIGRLES T PRU LIEU RETE 
顶点 至 少 访问 过 2 TK BAL EEL ER : 
C= (Vi V2 ttt SV. + VY ) F 
Y. 
di C, rP SEA TH CETT HEU TC EGER EE ARCU C E a Uu. C BR; 
C= (Va Vg p" n Va) 
HP din V =j BF CER] -TR SUE T HARER R din 编码 为 了 的 顶点 。 
例如 图 -5a AARRE ORE SAA GR P — AO A LLA RI S e 
LES dU 。 


V; 
G p3 


最 小 生成 树 T, 顶 点 旁 的 
数字 为 dfo 编 码 


‘by 


图 9-5 
XE G 的 最 小 生成 树 TOLE 9-500) ,得 出 C= (AVIV UV V VV VV VV OR C. 
进行 改造 ,得 
C= CV,V,V,V,V,V,V,) 
* 162 * 


C Rog E IRAE LL GHS 24-14-42 F43-24-1— 14. 
iE ECL Ip — Tr xe EE Lx TL SH Lm (eL f REEL — Heo LA V, UR Re den Mn 
T sie T 833E I RE UR aT Ie IR d e C! CLE 12, VE puc — 


Te 
LIS 程序 
program hamilton, 

Use 
Crta 

const 
maxa 20; 

type 
graphtvpe = array[1. -maxn.1l.. maxn | of integer: 
setype = set of 1.. maxne 
Itype = artav[1. . nzaxn ] of integer: 

var 
gipath,t z graphtype + 
ebaH iE Due jE ICT | 
{ pathi 4 ]- 27 TR ek à TELS ) T REP TEE GI J> 上 
( 财 最 短路 为 1 path] i 
i 1 顶点 1 可 达 顶 点 1 t 
Copt RM tiles } 
( ta 其 它 } 
k,father « hype; 
{ k[5]— I6 A, i 的 din DER s furherl ] — 85 9 à f] AZ TR EX Dl din Sep ied } 
n,cost : integer; ( n— fL e cost- orf | 
t : texti (E — Xübk dt } 


procedure imt ; 

var i.) + integery 

str . string 
begin 

clrscr } 
write( file name = ^; readln(str?; { IE E HM i 
assign(f str); vesev(D; — CC EA IFE td EE e} 
madlnntf.n?; + BEAR S 
fnlehacfa,sizeoffg)y 0), — ( 4d E EE iE } 
while not eof(f) do ( We AGIR) 


bogin 
readIn C3). g[1.3 
eLA): gi 1]: 
end; 
clasetf?; 
end; 


nracedure floyd; 
! 确定 莉 项 点 出 的 最 得 路 径 代 价 g Fui Prio E epp EAS M o patih 
1 jéj- 


var i,jsk : integer, 
begin 
fillehar (path „sizeof (path? 0) 3 
for k1—1 to n do 
for i,—1 to n do 
for j:=1 to n do 
if (i775) and (glik]=>0) 
and (Cg[ k ]--glk. i] gU. jl or (glt-il-02 
then begín 
gli jJ; —gDik 1] glk.i]: 
path[i,j]:=k; 
end, 
end; 


procedure prim, ( 建立 最 小 生成 树 工 } 
var u : Settype; 
ki, ja, b, min ; integer; 
begin 
u:—[1] 
fillchar (t ,sizeof Ct) 00; 
while u«—»[1. . n] do 
begin 
min; —maxint ; 
for i:=1 to n do 
if i in u then 
for j:—1 to n do 
if (not Cj in u)) and (g[i.j]-min) 
then begin min: —gl'i;j]: a; =i; b:=j; end; 
t[a sb]: =]; t[b.a]: =l; 
u:=u+ Lb]; 
end; 
end, 


procedure show p.q:integer), 
( 打印 hamilton 回路 中 p MAZ a BUR BERE } 


begin 
if path[p.q ]- 0 
then begin 
writein(p,' —-' ,q3; 
cast: —cost--g[p qi: 
end 
else begin show(p.path[p.a D: showtpath[p,q]:2) : end; 
end; 


procedure dis; 
var V,ui.p»i ; integer; 
begin 
Bllchar (k .sizeof (k) 0); 11 =0; v17:0; cost: =0; 
repeat repeat inc(v2; until (v77n) or (k[v]—05; 
CI — TOR BEDS RITU. v) 


M ve =n then 
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begin 
father[v]; =0; ( U v 为 根 搜索 } 
repeat inc(i); 
if i721 then show{p,v)s 
{v 非 根 , 打 印 p 至 v 的 一 段 路 } 
pics { 从 出 发 继续 搜索 } 
kiv]:=i; ( v fj dfs (& ) 
repeat u: =0; 
repeat inc(u), 
- until (Cun) or (t[v;ul70) and (k[u]—03; 
{ 搜索 最 小 生成 树 中 与 v 关联 的 一 个 未 访问 点 u } 
df un then 
{ 车 u 存 在, 则 设 的 父亲 顶点 为 vY ,继续 从 4 出 发 搜索 } 
begin 
father[u] :一 w， 
yi 
end 
else v: --father[v ]; 
Ev BARIT WERE v 的 父 顶 点 } 
until Cun) or (y=0)} 
{ 直至 从 vv 扩展 出 u 或 车 以 v Aw AU X } 
until v=0; { 直至 以 为 根 的 树 全 部 扩展 } 
end; 
until vn, ( 直至 所 有 顶点 搜索 过 j 
writelnC total cost : ' cost); 打印 最 佳 路 径 代 价 } 
end: 
begin 
iit, { 读 入 图 } 
floyd, 1 求 各 顶点 间 的 最 佳 路 径 } 
prim, 《 建立 最 小 生成 树 个 } 
dfs; 
ORERHER T 树 ,对 访 何 序列 Ce 进行 政 造 , 得 出 哈密 尔 幅 回路 ) 
end. 


9. 4 HERE [51] BI 


一 、 问题 及 其 解法 


今 有 工作 和 jj 要 在 同 Aji 到 Ji ALAE A 
n 项 工作 排队 ,使 得 275; = min, 


上 上述 问题 至 今 仍 无 有 效 算法 ,我 们 这 里 内 能 给 出 一 个 近似 算法 。 在 讲 算法 之 
: 先 引 出 底 图 和 竞赛 图 的 定义 : 


L EL G 为 底 图 的 有 向 图 中 必 有 长 为 壬 (G) 一 1 的 有 向 轨 。 显 然 , 由 于 XCKO =n, BEDA 
竞赛 图 中 有 长 为 X OK) 7 19 — 1 的 有 向 轨 , 即 竞赛 图 中 有 有 向 险 密 尔 驾 轨 ( 舍 一 切 顶 点 
的 有 向 罗 ) 。 

2. 避 是 无 环 有 向 图 , 则 底 图 中 含有 一 个 独立 集 , 从 3 内 的 顶点 出 发 ,通过 长 度 至 多 是 
2 的 有 向 轨 , 可 以 到 达 队 5 外 的 任 一 顶点 。 显 然 由 于 天。 的 最 大 独立 集 为 一 个 顶点 构成 , 因 
光亮 赛 图 中 会 有 一 个 顶点 ,从 该 预 点 出 发 ,通过 长 至 多 为 2 的 有 向 轨 , 可 以 到 达 任 何 顶点 。 

下 面 ,我 们 转 入 近似 算法 的 分 析 ; 

I. 以 工作 VESTRE 为 有 疝 图 G HHR, SHIH tyt} SAEC 1813 IZ Js 
于 是 得 到 的 有 庙 图 中 合生 成 竞赛 图 ， 

2， 在 有 向 图 妇 中 求 有 向 哈密 尔 顿 轨 , 依 此 哈密 尔 顿 贫 上 顶点 的 顺序 按 排 工作 序列 。 
例如 ,机 器 调整 矩阵 为 


. E E ia Á Ís E 
AT 0 5 3 4 2 1 
h| 1 0 1 23 3 2 
h| 2 5 0 1 83 3 
hil 1 4 4 O 1 2 
á; 1 3 4 5 0 5 
js L 4 4 2 3 1 0 


| 9-6 


求 这 6 项 工作 如 何 安排 工序 ,使 总 加 工时 间 最 少 。 
RHEA ME c.n Aat AD 8 8 o4 BL (L5 tSt] E de [81 3 «js 
jc RS 9-65. 


5 十 1 十 1 十 1 十 5 一 13 


=. 最 佳 排序 问题 的 程序 


program gong zio; 


' 166 * 


uses 


Cr 
const 
maxn == 80, 
type 
graphtype = artay[1.. maxn,1.. maxn] of integer; | MKPR M 
itype = array[ 1. . maxn] of integer; MAH., 
settype = set of 1.. maxn; 
val 
g : graphtype, { 带 仅 的 邻接 年 阵 } 
1 : itype; LI] WAR LT BUS } 
n :integger; { 顶点 个 数 } 
f : texti { 文件 变量 } 


procedure init; 
var tj : infoger; 
str : string: 
begin 
cirscr; write(' filename —'), readln(str); 
{ SX CIEEGE SOC HEAE ROGER } 
assign (f ,str) ; reset(D ; readin(f,n?; 
( TEE Gr EAMA ; 
for i; =] to n do 
for j:=1 to n do 
read (fg[i,j])s 
close(f); 
end; 


function hamilton (lev integer ss :settype}, boolean; 
var 
i.) : integer: 
begin 
hamilton; — true; 
if [ev —n-E 1 then exit, ( 车险 密 尔 顿 图形 成 , 则 返回 true } 
j:- [lev — 1]: { 恢复 前 一 个 顶点 的 序 导 } 
for i; —1 to n do 
{ 以 项 点 j 29 3 DE ERFARA IRI im d 
if not (i in s) and (ij) and (lji ]< =g] 
then begin 
l[lev]: =i: 1 MAI RARA RAA } 
if hamilton lev 4-1,5-- [1D then exit; 
( 若 递 归 搜索 团 的 下 一 个 项 点 上 成功 , 则 返回 true } 
end ; 


hamilton; --false; ( Bi SE JR BREL E E ai [8] false ) 


end [] 


procedure main: 
var hjicost ; integer; 
begia 
for i:=1 to n do 
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begin 
1[1];=i; < 从 vw 开始 搜索 哈密 尔 顿 图 } 
if hamilton C2, [i]} 
{ 若 搜 索 成 功 , 则 计算 调 机 时 间 , 打 印 退 出 ! 
then begin 
write(i); cost:=04 
for j1—2 to n do 
begin writeC[j]:3?1 inc(cost;g(1Lj—1]1.1Cj i] : endi 
writeln; 
writeln('cost ; cost}; 
exit s 
endi; 
end; 
end; 


begin 
inita {AHA} 
main; 1 计算 和 输出 最 佳 工作 排序 } 


end, 


* 168 * 


